home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / Game / F-G / Face Maker 1.0.sit / Face Maker / Face Maker 1.0b.rsrc / STXT_1285 < prev    next >
Unknown  |  1993-11-17  |  14.8 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% dexmagic Director STXT default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 36 5e | 00 00 04 9e 2d 2d 0d 0d |......6^|....--..|
|00000010| 6d 61 63 72 6f 20 53 61 | 76 65 69 6e 69 74 69 61 |macro Sa|veinitia|
|00000020| 6c 50 61 72 74 73 0d 72 | 65 73 65 74 73 70 72 69 |lParts.r|esetspri|
|00000030| 74 65 73 20 2d 2d 20 73 | 68 6f 77 20 73 63 6f 72 |tes -- s|how scor|
|00000040| 65 20 64 65 66 61 75 6c | 74 73 0d 67 6f 20 74 6f |e defaul|ts.go to|
|00000050| 20 22 66 56 69 65 77 22 | 0d 50 61 72 74 73 54 6f | "fView"|.PartsTo|
|00000060| 54 65 78 74 20 45 32 32 | 20 2d 2d 20 69 6e 69 74 |Text E22| -- init|
|00000070| 69 61 6c 20 66 65 6d 61 | 6c 65 20 66 61 63 65 20 |ial fema|le face |
|00000080| 70 61 72 74 20 6c 6f 63 | 73 0d 67 6f 20 74 6f 20 |part loc|s.go to |
|00000090| 22 6d 56 69 65 77 22 0d | 50 61 72 74 73 54 6f 54 |"mView".|PartsToT|
|000000a0| 65 78 74 20 45 32 33 0d | 0d 6d 61 63 72 6f 20 50 |ext E23.|.macro P|
|000000b0| 61 72 74 73 54 6f 54 65 | 78 74 20 54 65 78 74 43 |artsToTe|xt TextC|
|000000c0| 61 73 74 0d 70 75 74 20 | 65 6d 70 74 79 20 69 6e |ast.put |empty in|
|000000d0| 74 6f 20 54 0d 72 65 70 | 65 61 74 20 77 69 74 68 |to T.rep|eat with|
|000000e0| 20 69 20 3d 20 32 20 74 | 6f 20 39 0d 70 75 74 20 | i = 2 t|o 9.put |
|000000f0| 74 68 65 20 4c 6f 63 48 | 20 6f 66 20 73 70 72 69 |the LocH| of spri|
|00000100| 74 65 20 69 20 26 22 2c | 20 22 20 26 20 74 68 65 |te i &",| " & the|
|00000110| 20 4c 6f 63 56 20 6f 66 | 20 73 70 72 69 74 65 20 | LocV of| sprite |
|00000120| 69 20 26 22 2c 20 22 20 | 26 20 74 68 65 20 43 61 |i &", " |& the Ca|
|00000130| 73 74 4e 75 6d 20 6f 66 | 20 73 70 72 69 74 65 20 |stNum of| sprite |
|00000140| 69 20 c2 0d 26 20 72 65 | 74 75 72 6e 20 61 66 74 |i ..& re|turn aft|
|00000150| 65 72 20 54 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |er T.end| repeat.|
|00000160| 73 65 74 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 |set the |text of |
|00000170| 63 61 73 74 20 54 65 78 | 74 43 61 73 74 20 74 6f |cast Tex|tCast to|
|00000180| 20 54 0d 0d 6d 61 63 72 | 6f 20 53 65 74 50 61 72 | T..macr|o SetPar|
|00000190| 74 73 54 6f 54 65 78 74 | 44 65 66 20 54 65 78 74 |tsToText|Def Text|
|000001a0| 43 61 73 74 0d 73 65 74 | 20 54 20 3d 20 74 68 65 |Cast.set| T = the|
|000001b0| 20 74 65 78 74 20 6f 66 | 20 63 61 73 74 20 54 65 | text of| cast Te|
|000001c0| 78 74 43 61 73 74 0d 72 | 65 70 65 61 74 20 77 69 |xtCast.r|epeat wi|
|000001d0| 74 68 20 69 20 3d 20 31 | 20 74 6f 20 38 0d 73 65 |th i = 1| to 8.se|
|000001e0| 74 20 74 68 65 20 4c 6f | 63 48 20 6f 66 20 73 70 |t the Lo|cH of sp|
|000001f0| 72 69 74 65 20 28 69 20 | 2b 20 31 29 20 74 6f 20 |rite (i |+ 1) to |
|00000200| 76 61 6c 75 65 28 69 74 | 65 6d 20 31 20 6f 66 20 |value(it|em 1 of |
|00000210| 6c 69 6e 65 20 69 20 6f | 66 20 54 29 0d 73 65 74 |line i o|f T).set|
|00000220| 20 74 68 65 20 4c 6f 63 | 56 20 6f 66 20 73 70 72 | the Loc|V of spr|
|00000230| 69 74 65 20 28 69 20 2b | 20 31 29 20 74 6f 20 76 |ite (i +| 1) to v|
|00000240| 61 6c 75 65 28 69 74 65 | 6d 20 32 20 6f 66 20 6c |alue(ite|m 2 of l|
|00000250| 69 6e 65 20 69 20 6f 66 | 20 54 29 0d 2d 2d 73 65 |ine i of| T).--se|
|00000260| 74 20 74 68 65 20 43 61 | 73 74 4e 75 6d 20 6f 66 |t the Ca|stNum of|
|00000270| 20 73 70 72 69 74 65 20 | 28 69 20 2b 20 31 29 20 | sprite |(i + 1) |
|00000280| 74 6f 20 76 61 6c 75 65 | 28 69 74 65 6d 20 33 20 |to value|(item 3 |
|00000290| 6f 66 20 6c 69 6e 65 20 | 69 20 6f 66 20 54 29 20 |of line |i of T) |
|000002a0| 2d 2d 20 64 6f 6e 65 20 | 62 79 20 72 65 63 61 6c |-- done |by recal|
|000002b0| 6c 0d 2d 2d 70 75 74 20 | 69 26 26 76 61 6c 75 65 |l.--put |i&&value|
|000002c0| 28 69 74 65 6d 20 31 20 | 6f 66 20 6c 69 6e 65 20 |(item 1 |of line |
|000002d0| 69 20 6f 66 20 54 29 26 | 26 76 61 6c 75 65 28 69 |i of T)&|&value(i|
|000002e0| 74 65 6d 20 32 20 6f 66 | 20 6c 69 6e 65 20 69 20 |tem 2 of| line i |
|000002f0| 6f 66 20 54 29 26 26 76 | 61 6c 75 65 28 69 74 65 |of T)&&v|alue(ite|
|00000300| 6d 20 33 20 6f 66 20 6c | 69 6e 65 20 69 20 6f 66 |m 3 of l|ine i of|
|00000310| 20 54 29 2d 2d 24 24 24 | 0d 65 6e 64 20 72 65 70 | T)--$$$|.end rep|
|00000320| 65 61 74 0d 0d 6d 61 63 | 72 6f 20 54 65 78 74 44 |eat..mac|ro TextD|
|00000330| 65 66 54 6f 41 72 72 61 | 79 20 54 65 78 74 43 61 |efToArra|y TextCa|
|00000340| 73 74 2c 45 6e 74 72 79 | 4e 75 6d 0d 67 6c 6f 62 |st,Entry|Num.glob|
|00000350| 61 6c 20 53 61 76 65 41 | 72 72 61 79 0d 73 65 74 |al SaveA|rray.set|
|00000360| 20 54 20 3d 20 74 68 65 | 20 74 65 78 74 20 6f 66 | T = the| text of|
|00000370| 20 63 61 73 74 20 54 65 | 78 74 43 61 73 74 0d 72 | cast Te|xtCast.r|
|00000380| 65 70 65 61 74 20 77 69 | 74 68 20 69 20 3d 20 31 |epeat wi|th i = 1|
|00000390| 20 74 6f 20 38 0d 20 73 | 65 74 20 70 6f 69 6e 74 | to 8. s|et point|
|000003a0| 65 72 20 3d 20 53 61 76 | 65 41 72 72 61 79 28 6d |er = Sav|eArray(m|
|000003b0| 47 65 74 2c 69 29 0d 20 | 20 20 20 70 6f 69 6e 74 |Get,i). | point|
|000003c0| 65 72 28 6d 50 75 74 2c | 45 6e 74 72 79 4e 75 6d |er(mPut,|EntryNum|
|000003d0| 2c 76 61 6c 75 65 28 69 | 74 65 6d 20 33 20 6f 66 |,value(i|tem 3 of|
|000003e0| 20 6c 69 6e 65 20 69 20 | 6f 66 20 54 29 20 29 2d | line i |of T) )-|
|000003f0| 2d 20 63 75 72 72 65 6e | 74 20 63 61 73 74 0d 65 |- curren|t cast.e|
|00000400| 6e 64 20 72 65 70 65 61 | 74 0d 0d 0d 6d 61 63 72 |nd repea|t...macr|
|00000410| 6f 20 4d 6f 75 73 65 56 | 61 6c 0d 72 65 70 65 61 |o MouseV|al.repea|
|00000420| 74 20 77 68 69 6c 65 20 | 74 72 75 65 0d 72 65 70 |t while |true.rep|
|00000430| 65 61 74 20 77 68 69 6c | 65 20 6d 6f 75 73 65 55 |eat whil|e mouseU|
|00000440| 70 28 29 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 70 |p().end |repeat.p|
|00000450| 75 74 20 74 68 65 20 6d | 6f 75 73 65 48 20 2d 20 |ut the m|ouseH - |
|00000460| 74 68 65 20 6c 65 66 74 | 20 6f 66 20 73 70 72 69 |the left| of spri|
|00000470| 74 65 20 32 31 20 26 26 | 20 74 68 65 20 6d 6f 75 |te 21 &&| the mou|
|00000480| 73 65 56 20 2d 20 74 68 | 65 20 74 6f 70 20 6f 66 |seV - th|e top of|
|00000490| 20 73 70 72 69 74 65 20 | 32 31 0d 72 65 70 65 61 | sprite |21.repea|
|000004a0| 74 20 77 68 69 6c 65 20 | 6d 6f 75 73 65 44 6f 77 |t while |mouseDow|
|000004b0| 6e 28 29 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 65 |n().end |repeat.e|
|000004c0| 6e 64 20 72 65 70 65 61 | 74 0d 0d 6d 61 63 72 6f |nd repea|t..macro|
|000004d0| 20 53 61 79 48 69 0d 52 | 65 73 65 74 53 70 72 69 | SayHi.R|esetSpri|
|000004e0| 74 65 73 0d 73 65 74 20 | 53 74 61 72 74 46 20 3d |tes.set |StartF =|
|000004f0| 20 6c 61 62 65 6c 28 22 | 53 65 71 75 65 6e 63 65 | label("|Sequence|
|00000500| 22 29 0d 70 72 65 6c 6f | 61 64 20 53 74 61 72 74 |").prelo|ad Start|
|00000510| 46 20 2c 20 53 74 61 72 | 74 46 20 2b 20 34 30 0d |F , Star|tF + 40.|
|00000520| 70 6c 61 79 20 66 72 61 | 6d 65 20 22 53 65 71 75 |play fra|me "Sequ|
|00000530| 65 6e 63 65 22 0d 55 6e | 6c 6f 61 64 43 61 73 74 |ence".Un|loadCast|
|00000540| 20 45 31 35 0d 6d 61 63 | 72 6f 20 42 61 69 6c 0d | E15.mac|ro Bail.|
|00000550| 67 6c 6f 62 61 6c 20 47 | 65 6e 64 65 72 53 79 6d |global G|enderSym|
|00000560| 0d 70 6c 61 79 20 66 72 | 61 6d 65 20 47 65 6e 64 |.play fr|ame Gend|
|00000570| 65 72 53 79 6d 20 26 22 | 42 61 69 6c 22 20 2d 2d |erSym &"|Bail" --|
|00000580| 20 6f 6e 65 20 6c 61 73 | 74 20 63 68 61 6e 63 65 | one las|t chance|
|00000590| 0d 0d 6d 61 63 72 6f 20 | 52 65 73 65 74 20 2d 2d |..macro |Reset --|
|000005a0| 20 6d 65 6e 75 20 66 75 | 6e 63 74 69 6f 6e 20 0d | menu fu|nction .|
|000005b0| 72 65 73 65 74 73 70 72 | 69 74 65 73 20 2d 2d 20 |resetspr|ites -- |
|000005c0| 61 6c 6c 6f 77 20 73 63 | 6f 72 65 64 20 69 6e 69 |allow sc|ored ini|
|000005d0| 74 69 61 6c 20 66 61 63 | 65 20 74 6f 20 73 68 6f |tial fac|e to sho|
|000005e0| 77 0d 67 6f 20 74 6f 20 | 66 72 61 6d 65 20 31 0d |w.go to |frame 1.|
|000005f0| 0d 6d 61 63 72 6f 20 69 | 6e 69 74 46 61 63 65 50 |.macro i|nitFaceP|
|00000600| 75 70 70 65 74 73 0d 67 | 6c 6f 62 61 6c 20 53 61 |uppets.g|lobal Sa|
|00000610| 76 65 41 72 72 61 79 2c | 47 65 6e 64 65 72 53 79 |veArray,|GenderSy|
|00000620| 6d 2c 47 65 6e 64 65 72 | 43 61 73 74 2c 47 65 6e |m,Gender|Cast,Gen|
|00000630| 64 65 72 44 53 74 61 72 | 74 0d 67 6c 6f 62 61 6c |derDStar|t.global|
|00000640| 20 53 61 76 65 43 6f 75 | 6e 74 46 2c 43 75 72 72 | SaveCou|ntF,Curr|
|00000650| 65 6e 74 46 61 63 65 46 | 2c 53 61 76 65 43 6f 75 |entFaceF|,SaveCou|
|00000660| 6e 74 4d 2c 43 75 72 72 | 65 6e 74 46 61 63 65 4d |ntM,Curr|entFaceM|
|00000670| 0d 43 75 72 73 6f 72 20 | 34 20 2d 2d 20 77 61 74 |.Cursor |4 -- wat|
|00000680| 63 68 0d 69 66 20 74 68 | 65 20 63 6f 6c 6f 72 51 |ch.if th|e colorQ|
|00000690| 44 20 74 68 65 6e 20 69 | 6e 73 74 61 6c 6c 4d 65 |D then i|nstallMe|
|000006a0| 6e 75 20 45 31 33 0d 65 | 6c 73 65 20 69 6e 73 74 |nu E13.e|lse inst|
|000006b0| 61 6c 6c 4d 65 6e 75 20 | 45 31 34 20 2d 2d 20 6e |allMenu |E14 -- n|
|000006c0| 6f 20 63 6f 70 79 20 66 | 75 6e 63 74 69 6f 6e 20 |o copy f|unction |
|000006d0| 62 6f 6d 62 73 3f 0d 2d | 2d 69 66 20 6e 6f 74 20 |bombs?.-|-if not |
|000006e0| 53 74 72 69 6e 67 70 28 | 47 65 6e 64 65 72 53 79 |Stringp(|GenderSy|
|000006f0| 6d 29 20 74 68 65 6e 20 | 6d 61 6b 65 46 65 6d 61 |m) then |makeFema|
|00000700| 6c 65 20 2d 2d 73 65 74 | 20 47 65 6e 64 65 72 53 |le --set| GenderS|
|00000710| 79 6d 20 3d 20 22 66 22 | 20 2d 2d 20 69 6e 69 74 |ym = "f"| -- init|
|00000720| 69 61 6c 79 20 66 65 6d | 61 6c 65 0d 69 66 20 4e |ialy fem|ale.if N|
|00000730| 4f 54 20 6f 62 6a 65 63 | 74 70 28 53 61 76 65 41 |OT objec|tp(SaveA|
|00000740| 72 72 61 79 29 20 74 68 | 65 6e 20 2d 2d 20 6e 6f |rray) th|en -- no|
|00000750| 74 20 70 72 65 76 69 6f | 75 73 6c 79 20 63 72 65 |t previo|usly cre|
|00000760| 61 74 65 64 0d 20 20 20 | 20 73 65 74 20 53 61 76 |ated. | set Sav|
|00000770| 65 41 72 72 61 79 20 3d | 20 61 72 72 61 79 4d 61 |eArray =| arrayMa|
|00000780| 6b 65 72 28 6d 6e 65 77 | 29 0d 20 20 20 20 20 2d |ker(mnew|). -|
|00000790| 2d 20 63 72 65 61 74 65 | 20 38 20 73 70 72 69 74 |- create| 8 sprit|
|000007a0| 65 27 73 20 63 61 73 74 | 20 61 73 73 69 67 6e 20 |e's cast| assign |
|000007b0| 73 74 6f 72 61 67 65 20 | 26 20 67 65 6e 64 65 72 |storage |& gender|
|000007c0| 20 0d 20 20 20 20 72 65 | 70 65 61 74 20 77 69 74 | . re|peat wit|
|000007d0| 68 20 69 20 3d 20 31 20 | 74 6f 20 38 0d 20 20 20 |h i = 1 |to 8. |
|000007e0| 20 20 20 20 20 53 61 76 | 65 41 72 72 61 79 28 6d | Sav|eArray(m|
|000007f0| 50 75 74 2c 69 2c 61 72 | 72 61 79 4d 61 6b 65 72 |Put,i,ar|rayMaker|
|00000800| 28 6d 6e 65 77 29 29 20 | 2d 2d 20 73 74 6f 72 65 |(mnew)) |-- store|
|00000810| 20 70 6f 69 6e 74 65 72 | 73 20 74 6f 20 70 61 72 | pointer|s to par|
|00000820| 74 20 73 74 6f 72 61 67 | 65 20 61 72 72 61 79 73 |t storag|e arrays|
|00000830| 0d 20 20 20 20 65 6e 64 | 20 72 65 70 65 61 74 0d |. end| repeat.|
|00000840| 65 6e 64 20 69 66 0d 73 | 65 74 20 47 65 6e 64 65 |end if.s|et Gende|
|00000850| 72 53 79 6d 20 3d 20 22 | 6e 22 20 2d 2d 6e 65 75 |rSym = "|n" --neu|
|00000860| 74 65 72 20 75 6e 74 69 | 6c 20 67 65 6e 64 65 72 |ter unti|l gender|
|00000870| 20 73 65 6c 65 63 74 69 | 6f 6e 0d 54 65 78 74 44 | selecti|on.TextD|
|00000880| 65 66 54 6f 41 72 72 61 | 79 20 45 32 32 2c 31 20 |efToArra|y E22,1 |
|00000890| 2d 2d 20 70 72 65 73 61 | 76 65 20 66 69 72 73 74 |-- presa|ve first|
|000008a0| 20 66 65 6d 61 6c 65 20 | 65 6e 74 72 79 0d 73 65 | female |entry.se|
|000008b0| 74 20 43 75 72 72 65 6e | 74 46 61 63 65 46 20 3d |t Curren|tFaceF =|
|000008c0| 20 31 0d 73 65 74 20 53 | 61 76 65 43 6f 75 6e 74 | 1.set S|aveCount|
|000008d0| 46 20 3d 20 31 0d 54 65 | 78 74 44 65 66 54 6f 41 |F = 1.Te|xtDefToA|
|000008e0| 72 72 61 79 20 45 32 33 | 2c 31 33 20 2d 2d 2d 31 |rray E23|,13 ---1|
|000008f0| 73 74 20 6d 61 6c 65 20 | 69 6e 20 2b 31 32 74 68 |st male |in +12th|
|00000900| 20 65 6e 74 72 79 0d 73 | 65 74 20 43 75 72 72 65 | entry.s|et Curre|
|00000910| 6e 74 46 61 63 65 4d 20 | 3d 20 31 20 2d 2d 20 6d |ntFaceM |= 1 -- m|
|00000920| 61 6c 65 20 70 61 72 61 | 6d 65 74 65 72 73 20 20 |ale para|meters |
|00000930| 64 6f 6e 65 20 62 79 20 | 73 61 76 65 46 61 63 65 |done by |saveFace|
|00000940| 0d 73 65 74 20 53 61 76 | 65 43 6f 75 6e 74 4d 20 |.set Sav|eCountM |
|00000950| 3d 20 31 20 2d 2d 20 64 | 65 66 61 75 6c 74 20 6d |= 1 -- d|efault m|
|00000960| 75 73 74 20 62 65 20 70 | 72 65 73 61 76 65 64 20 |ust be p|resaved |
|00000970| 0d 2d 2d 41 64 64 46 61 | 63 65 20 2d 2d 20 73 63 |.--AddFa|ce -- sc|
|00000980| 6f 72 65 20 64 65 66 69 | 6e 65 64 20 64 65 66 61 |ore defi|ned defa|
|00000990| 75 6c 74 0d 53 65 74 53 | 70 72 69 74 65 73 0d 73 |ult.SetS|prites.s|
|000009a0| 65 74 20 74 68 65 20 70 | 75 70 70 65 74 20 6f 66 |et the p|uppet of|
|000009b0| 20 73 70 72 69 74 65 20 | 32 30 20 74 6f 20 74 72 | sprite |20 to tr|
|000009c0| 75 65 20 2d 2d 20 6d 6f | 76 69 6e 67 20 27 73 61 |ue -- mo|ving 'sa|
|000009d0| 76 65 27 20 62 74 6e 0d | 73 65 74 20 74 68 65 20 |ve' btn.|set the |
|000009e0| 70 75 70 70 65 74 20 6f | 66 20 73 70 72 69 74 65 |puppet o|f sprite|
|000009f0| 20 32 33 20 74 6f 20 74 | 72 75 65 20 2d 2d 20 73 | 23 to t|rue -- s|
|00000a00| 61 76 65 64 20 23 20 6d | 61 73 6b 0d 53 65 74 46 |aved # m|ask.SetF|
|00000a10| 61 63 65 43 6f 75 6e 74 | 42 61 72 20 31 2c 31 20 |aceCount|Bar 1,1 |
|00000a20| 2d 2d 20 70 75 74 20 62 | 61 63 6b 20 61 66 74 65 |-- put b|ack afte|
|00000a30| 72 20 52 45 53 45 54 0d | 43 75 72 73 6f 72 20 30 |r RESET.|Cursor 0|
|00000a40| 20 2d 2d 20 67 6f 0d 2d | 2d 6d 61 6b 65 46 65 6d | -- go.-|-makeFem|
|00000a50| 61 6c 65 20 2d 2d 20 69 | 6e 69 74 69 61 6c 79 0d |ale -- i|nitialy.|
|00000a60| 2d 2d 69 6e 73 74 61 6c | 6c 4d 65 6e 75 20 44 31 |--instal|lMenu D1|
|00000a70| 33 20 2d 2d 20 6d 6f 76 | 65 64 0d 0d 6d 61 63 72 |3 -- mov|ed..macr|
|00000a80| 6f 20 52 65 73 65 74 53 | 70 72 69 74 65 73 20 2d |o ResetS|prites -|
|00000a90| 2d 20 6c 69 6b 65 20 77 | 68 65 6e 20 63 68 61 6e |- like w|hen chan|
|00000aa0| 67 69 6e 67 20 67 65 6e | 64 65 72 0d 72 65 70 65 |ging gen|der.repe|
|00000ab0| 61 74 20 77 69 74 68 20 | 69 20 3d 20 32 20 74 6f |at with |i = 2 to|
|00000ac0| 20 39 0d 20 20 20 20 73 | 65 74 20 74 68 65 20 70 | 9. s|et the p|
|00000ad0| 75 70 70 65 74 20 6f 66 | 20 73 70 72 69 74 65 20 |uppet of| sprite |
|00000ae0| 69 20 74 6f 20 66 61 6c | 73 65 20 2d 2d 20 73 6f |i to fal|se -- so|
|00000af0| 20 63 75 72 72 65 6e 74 | 6c 79 20 73 63 6f 72 65 | current|ly score|
|00000b00| 20 61 73 73 69 67 6e 65 | 64 20 64 65 66 61 75 6c | assigne|d defaul|
|00000b10| 74 73 20 73 68 6f 77 0d | 65 6e 64 20 72 65 70 65 |ts show.|end repe|
|00000b20| 61 74 0d 0d 6d 61 63 72 | 6f 20 53 65 74 53 70 72 |at..macr|o SetSpr|
|00000b30| 69 74 65 73 20 2d 2d 20 | 6c 69 6b 65 20 77 68 65 |ites -- |like whe|
|00000b40| 6e 20 63 68 61 6e 67 69 | 6e 67 20 67 65 6e 64 65 |n changi|ng gende|
|00000b50| 72 0d 72 65 70 65 61 74 | 20 77 69 74 68 20 69 20 |r.repeat| with i |
|00000b60| 3d 20 32 20 74 6f 20 39 | 0d 20 20 20 20 73 65 74 |= 2 to 9|. set|
|00000b70| 20 74 68 65 20 70 75 70 | 70 65 74 20 6f 66 20 73 | the pup|pet of s|
|00000b80| 70 72 69 74 65 20 69 20 | 74 6f 20 74 72 75 65 20 |prite i |to true |
|00000b90| 2d 2d 20 6c 69 6e 67 69 | 20 63 6f 6e 74 72 6f 6c |-- lingi| control|
|00000ba0| 61 62 6c 65 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |able.end| repeat.|
|00000bb0| 0d 6d 61 63 72 6f 20 54 | 6f 67 67 6c 65 47 65 6e |.macro T|oggleGen|
|00000bc0| 64 65 72 0d 67 6c 6f 62 | 61 6c 20 47 65 6e 64 65 |der.glob|al Gende|
|00000bd0| 72 53 79 6d 2c 47 65 6e | 64 65 72 43 61 73 74 0d |rSym,Gen|derCast.|
|00000be0| 69 66 20 47 65 6e 64 65 | 72 53 79 6d 20 3d 20 22 |if Gende|rSym = "|
|00000bf0| 66 22 20 74 68 65 6e 0d | 20 20 20 4d 61 6b 65 4d |f" then.| MakeM|
|00000c00| 61 6c 65 0d 65 6c 73 65 | 0d 20 4d 61 6b 65 46 65 |ale.else|. MakeFe|
|00000c10| 6d 61 6c 65 0d 65 6e 64 | 20 69 66 0d 0d 0d 6d 61 |male.end| if...ma|
|00000c20| 63 72 6f 20 4d 61 6b 65 | 4d 61 6c 65 0d 67 6c 6f |cro Make|Male.glo|
|00000c30| 62 61 6c 20 47 65 6e 64 | 65 72 53 79 6d 2c 53 61 |bal Gend|erSym,Sa|
|00000c40| 76 65 43 6f 75 6e 74 4d | 2c 20 43 75 72 72 65 6e |veCountM|, Curren|
|00000c50| 74 46 61 63 65 4d 2c 47 | 65 6e 64 65 72 43 61 73 |tFaceM,G|enderCas|
|00000c60| 74 0d 20 73 65 74 20 47 | 65 6e 64 65 72 53 79 6d |t. set G|enderSym|
|00000c70| 20 3d 20 22 6d 22 0d 20 | 20 20 20 73 65 74 20 47 | = "m". | set G|
|00000c80| 65 6e 64 65 72 43 61 73 | 74 20 3d 20 43 31 31 20 |enderCas|t = C11 |
|00000c90| 2d 20 31 20 2d 2d 20 63 | 61 73 74 20 6e 75 6d 20 |- 1 -- c|ast num |
|00000ca0| 72 65 66 20 6f 66 66 73 | 65 74 20 0d 2d 2d 72 65 |ref offs|et .--re|
|00000cb0| 73 65 74 53 70 72 69 74 | 65 73 20 2d 2d 20 73 65 |setSprit|es -- se|
|00000cc0| 74 20 66 61 63 65 20 70 | 61 72 74 20 6c 6f 63 73 |t face p|art locs|
|00000cd0| 20 74 6f 20 64 65 66 61 | 75 6c 74 20 73 63 6f 72 | to defa|ult scor|
|00000ce0| 65 20 76 61 6c 75 65 73 | 20 2d 2d 20 62 65 74 74 |e values| -- bett|
|00000cf0| 65 72 20 74 6f 20 72 65 | 61 64 20 6c 6f 63 20 74 |er to re|ad loc t|
|00000d00| 61 62 6c 65 0d 69 66 20 | 74 68 65 20 46 72 65 65 |able.if |the Free|
|00000d10| 42 79 74 65 73 20 3c 20 | 31 31 33 30 30 30 20 74 |Bytes < |113000 t|
|00000d20| 68 65 6e 20 75 6e 4c 6f | 61 64 43 61 73 74 20 41 |hen unLo|adCast A|
|00000d30| 31 31 2c 42 38 38 20 2d | 2d 20 64 75 6d 70 20 66 |11,B88 -|- dump f|
|00000d40| 65 6d 61 6c 65 20 70 61 | 72 74 73 20 0d 70 72 65 |emale pa|rts .pre|
|00000d50| 6c 6f 61 64 43 61 73 74 | 20 43 31 31 2c 44 38 38 |loadCast| C11,D88|
|00000d60| 20 2d 2d 20 66 6f 72 20 | 66 61 73 74 20 6d 61 6c | -- for |fast mal|
|00000d70| 65 20 70 61 72 74 20 6d | 65 6e 75 20 61 63 74 69 |e part m|enu acti|
|00000d80| 6f 6e 0d 67 6f 20 74 6f | 20 66 72 61 6d 65 20 20 |on.go to| frame |
|00000d90| 22 6d 56 69 65 77 22 0d | 53 65 74 50 61 72 74 73 |"mView".|SetParts|
|00000da0| 54 6f 54 65 78 74 44 65 | 66 20 45 32 33 20 2d 2d |ToTextDe|f E23 --|
|00000db0| 20 73 74 6f 72 65 64 20 | 64 65 66 61 75 6c 74 20 | stored |default |
|00000dc0| 6c 6f 63 61 74 69 6f 6e | 73 0d 2d 2d 67 6f 20 74 |location|s.--go t|
|00000dd0| 6f 20 66 72 61 6d 65 20 | 66 72 61 6d 65 28 29 0d |o frame |frame().|
|00000de0| 20 2d 2d 69 66 20 53 61 | 76 65 43 6f 75 6e 74 4d | --if Sa|veCountM|
|00000df0| 20 3c 20 31 20 74 68 65 | 6e 20 53 61 76 65 46 61 | < 1 the|n SaveFa|
|00000e00| 63 65 20 2d 2d 20 70 72 | 69 6d 65 20 2d 2d 20 6e |ce -- pr|ime -- n|
|00000e10| 6f 77 20 64 6f 6e 65 20 | 62 79 20 69 6e 69 74 66 |ow done |by initf|
|00000e20| 61 63 65 2e 2e 2e 0d 2d | 2d 73 65 74 53 70 72 69 |ace....-|-setSpri|
|00000e30| 74 65 73 0d 2d 2d 65 6e | 64 20 69 66 0d 53 65 74 |tes.--en|d if.Set|
|00000e40| 46 61 63 65 43 6f 75 6e | 74 42 61 72 20 53 61 76 |FaceCoun|tBar Sav|
|00000e50| 65 43 6f 75 6e 74 4d 2c | 20 43 75 72 72 65 6e 74 |eCountM,| Current|
|00000e60| 46 61 63 65 4d 0d 72 65 | 63 61 6c 6c 46 61 63 65 |FaceM.re|callFace|
|00000e70| 20 43 75 72 72 65 6e 74 | 46 61 63 65 4d 20 2b 20 | Current|FaceM + |
|00000e80| 31 32 0d 75 70 64 61 74 | 65 53 74 61 67 65 0d 0d |12.updat|eStage..|
|00000e90| 0d 6d 61 63 72 6f 20 4d | 61 6b 65 46 65 6d 61 6c |.macro M|akeFemal|
|00000ea0| 65 0d 67 6c 6f 62 61 6c | 20 47 65 6e 64 65 72 53 |e.global| GenderS|
|00000eb0| 79 6d 2c 53 61 76 65 43 | 6f 75 6e 74 46 2c 20 43 |ym,SaveC|ountF, C|
|00000ec0| 75 72 72 65 6e 74 46 61 | 63 65 46 2c 47 65 6e 64 |urrentFa|ceF,Gend|
|00000ed0| 65 72 43 61 73 74 0d 73 | 65 74 20 47 65 6e 64 65 |erCast.s|et Gende|
|00000ee0| 72 53 79 6d 20 3d 20 22 | 66 22 0d 20 20 20 20 73 |rSym = "|f". s|
|00000ef0| 65 74 20 47 65 6e 64 65 | 72 43 61 73 74 20 3d 20 |et Gende|rCast = |
|00000f00| 30 20 2d 2d 20 63 61 73 | 74 20 6e 75 6d 20 72 65 |0 -- cas|t num re|
|00000f10| 66 20 6f 66 66 73 65 74 | 0d 69 66 20 74 68 65 20 |f offset|.if the |
|00000f20| 46 72 65 65 42 79 74 65 | 73 20 3c 20 32 30 34 30 |FreeByte|s < 2040|
|00000f30| 30 30 20 74 68 65 6e 20 | 75 6e 4c 6f 61 64 43 61 |00 then |unLoadCa|
|00000f40| 73 74 20 43 31 31 2c 44 | 38 38 20 2d 2d 20 64 75 |st C11,D|88 -- du|
|00000f50| 6d 70 20 6d 61 6c 65 20 | 70 61 72 74 73 20 0d 70 |mp male |parts .p|
|00000f60| 72 65 6c 6f 61 64 43 61 | 73 74 20 41 31 31 2c 42 |reloadCa|st A11,B|
|00000f70| 38 38 20 0d 67 6f 20 74 | 6f 20 66 72 61 6d 65 20 |88 .go t|o frame |
|00000f80| 20 22 66 56 69 65 77 22 | 0d 53 65 74 50 61 72 74 | "fView"|.SetPart|
|00000f90| 73 54 6f 54 65 78 74 44 | 65 66 20 45 32 32 0d 2d |sToTextD|ef E22.-|
|00000fa0| 2d 73 65 74 53 70 72 69 | 74 65 73 0d 53 65 74 46 |-setSpri|tes.SetF|
|00000fb0| 61 63 65 43 6f 75 6e 74 | 42 61 72 20 53 61 76 65 |aceCount|Bar Save|
|00000fc0| 43 6f 75 6e 74 46 2c 20 | 43 75 72 72 65 6e 74 46 |CountF, |CurrentF|
|00000fd0| 61 63 65 46 0d 72 65 63 | 61 6c 6c 46 61 63 65 20 |aceF.rec|allFace |
|00000fe0| 43 75 72 72 65 6e 74 46 | 61 63 65 46 0d 75 70 64 |CurrentF|aceF.upd|
|00000ff0| 61 74 65 53 74 61 67 65 | 0d 0d 6d 61 63 72 6f 20 |ateStage|..macro |
|00001000| 43 6f 6e 74 72 6f 6c 43 | 6c 69 63 6b 0d 67 6c 6f |ControlC|lick.glo|
|00001010| 62 61 6c 20 47 65 6e 64 | 65 72 53 79 6d 2c 47 65 |bal Gend|erSym,Ge|
|00001020| 6e 64 65 72 43 61 73 74 | 2c 47 65 6e 64 65 72 44 |nderCast|,GenderD|
|00001030| 53 74 61 72 74 2c 20 55 | 6e 64 6f 53 6e 75 6d 2c |Start, U|ndoSnum,|
|00001040| 55 6e 64 6f 43 6e 75 6d | 0d 69 66 20 55 6e 64 6f |UndoCnum|.if Undo|
|00001050| 53 6e 75 6d 20 3c 3e 20 | 30 20 74 68 65 6e 20 73 |Snum <> |0 then s|
|00001060| 65 74 20 74 68 65 20 63 | 61 73 74 4e 75 6d 20 6f |et the c|astNum o|
|00001070| 66 20 73 70 72 69 74 65 | 20 55 6e 64 6f 53 6e 75 |f sprite| UndoSnu|
|00001080| 6d 20 74 6f 20 55 6e 64 | 6f 43 6e 75 6d 20 2d 2d |m to Und|oCnum --|
|00001090| 20 75 6e 64 6f 20 70 72 | 65 76 75 0d 73 65 74 20 | undo pr|evu.set |
|000010a0| 50 61 6e 65 6c 20 3d 20 | 74 68 65 20 43 6c 69 63 |Panel = |the Clic|
|000010b0| 6b 4f 6e 0d 73 65 74 20 | 56 20 3d 20 74 68 65 20 |kOn.set |V = the |
|000010c0| 6d 6f 75 73 65 56 20 2d | 20 74 68 65 20 6c 6f 63 |mouseV -| the loc|
|000010d0| 56 20 6f 66 20 73 70 72 | 69 74 65 20 50 61 6e 65 |V of spr|ite Pane|
|000010e0| 6c 0d 73 65 74 20 48 20 | 3d 20 74 68 65 20 6d 6f |l.set H |= the mo|
|000010f0| 75 73 65 48 20 2d 20 74 | 68 65 20 6c 6f 63 48 20 |useH - t|he locH |
|00001100| 6f 66 20 73 70 72 69 74 | 65 20 50 61 6e 65 6c 0d |of sprit|e Panel.|
|00001110| 69 66 20 56 20 3e 20 34 | 36 20 74 68 65 6e 20 2d |if V > 4|6 then -|
|00001120| 2d 20 32 72 64 20 72 6f | 77 20 74 68 65 6e 0d 20 |- 2rd ro|w then. |
|00001130| 20 20 20 69 66 20 48 20 | 3e 20 31 31 32 20 74 68 | if H |> 112 th|
|00001140| 65 6e 0d 20 20 20 20 20 | 20 20 20 53 75 62 46 72 |en. | SubFr|
|00001150| 61 6d 65 20 47 65 6e 64 | 65 72 53 79 6d 20 26 20 |ame Gend|erSym & |
|00001160| 22 41 63 63 65 73 22 0d | 20 20 20 20 65 6c 73 65 |"Acces".| else|
|00001170| 0d 20 20 20 20 20 20 20 | 20 69 66 20 48 20 3e 20 |. | if H > |
|00001180| 36 38 20 74 68 65 6e 0d | 20 20 20 20 20 20 20 20 |68 then.| |
|00001190| 20 20 20 20 53 75 62 46 | 72 61 6d 65 20 47 65 6e | SubF|rame Gen|
|000011a0| 64 65 72 53 79 6d 20 26 | 20 22 48 61 69 72 22 0d |derSym &| "Hair".|
|000011b0| 20 20 20 20 20 20 20 20 | 65 6c 73 65 0d 20 20 20 | |else. |
|000011c0| 20 20 20 20 20 20 20 20 | 20 53 75 62 46 72 61 6d | | SubFram|
|000011d0| 65 20 47 65 6e 64 65 72 | 53 79 6d 20 26 20 22 53 |e Gender|Sym & "S|
|000011e0| 6b 75 6c 6c 22 0d 20 20 | 20 20 20 20 20 20 65 6e |kull". | en|
|000011f0| 64 20 69 66 0d 20 20 20 | 20 65 6e 64 20 69 66 0d |d if. | end if.|
|00001200| 65 6c 73 65 0d 20 20 20 | 20 69 66 20 56 20 3e 20 |else. | if V > |
|00001210| 32 33 20 74 68 65 6e 20 | 2d 2d 20 6d 69 64 64 6c |23 then |-- middl|
|00001220| 65 20 72 6f 77 0d 20 20 | 20 20 20 20 20 20 69 66 |e row. | if|
|00001230| 20 48 20 3c 20 31 31 32 | 20 61 6e 64 20 48 20 3e | H < 112| and H >|
|00001240| 20 36 30 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 | 60 then|. |
|00001250| 20 20 20 20 20 53 75 62 | 46 72 61 6d 65 20 47 65 | Sub|Frame Ge|
|00001260| 6e 64 65 72 53 79 6d 20 | 26 20 22 4d 6f 75 74 68 |nderSym |& "Mouth|
|00001270| 22 0d 20 20 20 20 20 20 | 20 20 65 6e 64 20 69 66 |". | end if|
|00001280| 0d 20 20 20 20 65 6c 73 | 65 20 2d 2d 20 74 6f 70 |. els|e -- top|
|00001290| 20 72 6f 77 0d 20 20 20 | 20 20 20 20 20 69 66 20 | row. | if |
|000012a0| 48 20 3e 20 31 31 32 20 | 74 68 65 6e 0d 20 20 20 |H > 112 |then. |
|000012b0| 20 20 20 20 20 20 20 20 | 20 53 75 62 46 72 61 6d | | SubFram|
|000012c0| 65 20 47 65 6e 64 65 72 | 53 79 6d 20 26 20 22 4c |e Gender|Sym & "L|
|000012d0| 65 79 65 22 0d 20 20 20 | 20 20 20 20 20 65 6c 73 |eye". | els|
|000012e0| 65 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 69 66 |e. | if|
|000012f0| 20 48 20 3e 20 36 38 20 | 74 68 65 6e 0d 20 20 20 | H > 68 |then. |
|00001300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 53 75 62 | | Sub|
|00001310| 46 72 61 6d 65 20 47 65 | 6e 64 65 72 53 79 6d 20 |Frame Ge|nderSym |
|00001320| 26 20 22 4e 6f 73 65 22 | 0d 20 20 20 20 20 20 20 |& "Nose"|. |
|00001330| 20 20 20 20 20 65 6c 73 | 65 0d 20 20 20 20 20 20 | els|e. |
|00001340| 20 20 20 20 20 20 20 20 | 20 20 53 75 62 46 72 61 | | SubFra|
|00001350| 6d 65 20 47 65 6e 64 65 | 72 53 79 6d 20 26 20 22 |me Gende|rSym & "|
|00001360| 52 65 79 65 22 0d 20 20 | 20 20 20 20 20 20 20 20 |Reye". | |
|00001370| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 20 20 20 | end if|. |
|00001380| 20 65 6e 64 20 69 66 0d | 20 20 20 20 65 6e 64 20 | end if.| end |
|00001390| 69 66 0d 65 6e 64 20 69 | 66 0d 0d 6d 61 63 72 6f |if.end i|f..macro|
|000013a0| 20 55 6e 64 6f 42 75 66 | 20 53 70 72 69 74 65 4e | UndoBuf| SpriteN|
|000013b0| 75 6d 0d 73 65 74 20 53 | 70 72 69 74 65 4e 75 6d |um.set S|priteNum|
|000013c0| 20 3d 20 53 70 72 69 74 | 65 4e 75 6d 20 2b 20 31 | = Sprit|eNum + 1|
|000013d0| 20 2d 2d 20 74 6f 6f 20 | 6c 61 7a 79 20 74 6f 20 | -- too |lazy to |
|000013e0| 65 64 69 74 20 63 6f 64 | 65 20 69 6e 20 73 63 6f |edit cod|e in sco|
|000013f0| 72 65 0d 67 6c 6f 62 61 | 6c 20 55 6e 64 6f 53 6e |re.globa|l UndoSn|
|00001400| 75 6d 2c 55 6e 64 6f 43 | 6e 75 6d 0d 73 65 74 20 |um,UndoC|num.set |
|00001410| 55 6e 64 6f 53 6e 75 6d | 20 3d 20 53 70 72 69 74 |UndoSnum| = Sprit|
|00001420| 65 4e 75 6d 20 2d 2d 20 | 69 66 20 6e 6f 20 63 6c |eNum -- |if no cl|
|00001430| 69 63 6b 20 69 73 20 6d | 61 64 65 0d 73 65 74 20 |ick is m|ade.set |
|00001440| 55 6e 64 6f 43 6e 75 6d | 20 3d 20 74 68 65 20 63 |UndoCnum| = the c|
|00001450| 61 73 74 6e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astnum o|f sprite|
|00001460| 20 53 70 72 69 74 65 4e | 75 6d 0d 0d 6d 61 63 72 | SpriteN|um..macr|
|00001470| 6f 20 4d 65 6e 75 45 78 | 69 74 0d 67 6c 6f 62 61 |o MenuEx|it.globa|
|00001480| 6c 20 55 6e 64 6f 53 6e | 75 6d 0d 73 65 74 20 55 |l UndoSn|um.set U|
|00001490| 6e 64 6f 53 6e 75 6d 20 | 3d 20 30 20 2d 2d 20 6b |ndoSnum |= 0 -- k|
|000014a0| 65 65 70 20 70 72 65 76 | 69 65 77 65 64 20 63 68 |eep prev|iewed ch|
|000014b0| 61 6e 67 65 0d 70 6c 61 | 79 20 64 6f 6e 65 20 2d |ange.pla|y done -|
|000014c0| 2d 20 62 61 63 6b 20 74 | 6f 20 6d 65 6e 75 0d 0d |- back t|o menu..|
|000014d0| 6d 61 63 72 6f 20 67 53 | 75 62 46 72 61 6d 65 20 |macro gS|ubFrame |
|000014e0| 4f 72 67 61 6e 0d 67 6c | 6f 62 61 6c 20 47 65 6e |Organ.gl|obal Gen|
|000014f0| 64 65 72 53 79 6d 0d 53 | 75 62 46 72 61 6d 65 20 |derSym.S|ubFrame |
|00001500| 47 65 6e 64 65 72 53 79 | 6d 20 26 20 4f 72 67 61 |GenderSy|m & Orga|
|00001510| 6e 0d 0d 6d 61 63 72 6f | 20 53 75 62 46 72 61 6d |n..macro| SubFram|
|00001520| 65 20 4e 65 77 46 72 61 | 6d 65 0d 67 6c 6f 62 61 |e NewFra|me.globa|
|00001530| 6c 20 47 65 6e 64 65 72 | 53 79 6d 2c 4e 65 77 46 |l Gender|Sym,NewF|
|00001540| 72 61 6d 65 67 20 2d 2d | 24 24 20 4e 65 77 46 72 |rameg --|$$ NewFr|
|00001550| 61 6d 65 20 74 65 6d 70 | 0d 73 65 74 20 4e 65 77 |ame temp|.set New|
|00001560| 46 72 61 6d 65 67 20 3d | 20 4e 65 77 46 72 61 6d |Frameg =| NewFram|
|00001570| 65 20 2d 2d 24 24 24 0d | 67 6f 20 74 6f 20 66 72 |e --$$$.|go to fr|
|00001580| 61 6d 65 20 47 65 6e 64 | 65 72 53 79 6d 20 26 22 |ame Gend|erSym &"|
|00001590| 56 69 65 77 22 20 2d 2d | 20 73 6f 20 64 6f 6e 65 |View" --| so done|
|000015a0| 73 20 72 65 74 75 72 6e | 20 68 65 72 65 0d 70 6c |s return| here.pl|
|000015b0| 61 79 20 66 72 61 6d 65 | 20 20 4e 65 77 46 72 61 |ay frame| NewFra|
|000015c0| 6d 65 0d 2d 2d 70 6c 61 | 79 20 66 72 61 6d 65 20 |me.--pla|y frame |
|000015d0| 47 65 6e 64 65 72 53 79 | 6d 20 26 20 4e 65 77 46 |GenderSy|m & NewF|
|000015e0| 72 61 6d 65 0d 0d 6d 61 | 63 72 6f 20 53 65 74 48 |rame..ma|cro SetH|
|000015f0| 61 69 72 0d 67 6c 6f 62 | 61 6c 20 47 65 6e 64 65 |air.glob|al Gende|
|00001600| 72 43 61 73 74 2c 55 6e | 64 6f 43 6e 75 6d 0d 73 |rCast,Un|doCnum.s|
|00001610| 65 74 20 4d 65 6e 75 50 | 69 63 6b 20 3d 20 66 61 |et MenuP|ick = fa|
|00001620| 6c 73 65 0d 2d 2d 20 73 | 77 69 74 63 68 65 64 20 |lse.-- s|witched |
|00001630| 74 6f 20 6e 65 77 65 72 | 20 6d 6f 75 73 65 43 61 |to newer| mouseCa|
|00001640| 73 74 20 66 75 6e 63 74 | 69 6f 6e 2c 20 69 6e 20 |st funct|ion, in |
|00001650| 70 61 72 74 20 6f 75 74 | 20 6f 66 20 6c 61 7a 79 |part out| of lazy|
|00001660| 20 74 72 61 63 6b 20 72 | 65 61 73 73 69 67 6e 0d | track r|eassign.|
|00001670| 2d 2d 72 65 70 65 61 74 | 20 77 69 74 68 20 69 20 |--repeat| with i |
|00001680| 3d 20 31 30 20 74 6f 20 | 31 37 20 2d 2d 20 6d 6f |= 10 to |17 -- mo|
|00001690| 76 65 64 20 74 72 61 63 | 6b 20 31 38 20 74 6f 20 |ved trac|k 18 to |
|000016a0| 31 2e 2e 2e 20 6b 6c 75 | 67 65 0d 20 20 20 20 2d |1... klu|ge. -|
|000016b0| 2d 69 66 20 52 6f 6c 6c | 6f 76 65 72 28 69 29 20 |-if Roll|over(i) |
|000016c0| 74 68 65 6e 0d 20 20 20 | 20 20 20 20 20 73 65 74 |then. | set|
|000016d0| 20 43 20 3d 20 74 68 65 | 20 6d 6f 75 73 65 43 61 | C = the| mouseCa|
|000016e0| 73 74 20 2d 2d 6e 65 77 | 0d 20 20 20 20 20 20 20 |st --new|. |
|000016f0| 20 69 66 20 43 20 3e 3d | 20 28 47 65 6e 64 65 72 | if C >=| (Gender|
|00001700| 43 61 73 74 20 2b 20 41 | 32 37 29 20 61 6e 64 20 |Cast + A|27) and |
|00001710| 43 20 3c 3d 20 28 47 65 | 6e 64 65 72 43 61 73 74 |C <= (Ge|nderCast|
|00001720| 20 2b 20 41 33 38 29 20 | 74 68 65 6e 20 2d 2d 6e | + A38) |then --n|
|00001730| 65 77 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 74 |ew. | set t|
|00001740| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|00001750| 72 69 74 65 20 37 20 74 | 6f 20 43 20 20 2d 2d 6e |rite 7 t|o C --n|
|00001760| 65 77 2d 2d 47 65 6e 64 | 65 72 43 61 73 74 20 2b |ew--Gend|erCast +|
|00001770| 20 41 32 38 20 2b 20 69 | 20 2d 20 31 30 0d 20 20 | A28 + i| - 10. |
|00001780| 20 20 20 20 20 20 73 65 | 74 20 4d 65 6e 75 50 69 | se|t MenuPi|
|00001790| 63 6b 20 3d 20 74 72 75 | 65 0d 20 20 20 20 20 20 |ck = tru|e. |
|000017a0| 20 20 2d 2d 65 78 69 74 | 20 72 65 70 65 61 74 0d | --exit| repeat.|
|000017b0| 20 20 20 20 65 6e 64 20 | 69 66 0d 2d 2d 65 6e 64 | end |if.--end|
|000017c0| 20 72 65 70 65 61 74 0d | 69 66 20 4d 65 6e 75 50 | repeat.|if MenuP|
|000017d0| 69 63 6b 20 3d 20 66 61 | 6c 73 65 20 61 6e 64 20 |ick = fa|lse and |
|000017e0| 74 68 65 20 6d 6f 75 73 | 65 48 20 3c 20 32 35 36 |the mous|eH < 256|
|000017f0| 20 6f 72 20 74 68 65 20 | 6d 6f 75 73 65 56 20 3e | or the |mouseV >|
|00001800| 20 32 37 30 20 74 68 65 | 6e 20 0d 20 73 65 74 20 | 270 the|n . set |
|00001810| 74 68 65 20 63 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the cast|Num of s|
|00001820| 70 72 69 74 65 20 37 20 | 74 6f 20 55 6e 64 6f 43 |prite 7 |to UndoC|
|00001830| 6e 75 6d 20 2d 2d 20 75 | 6e 73 65 6c 65 63 74 20 |num -- u|nselect |
|00001840| 6f 6e 6c 79 20 77 68 65 | 6e 20 6f 75 74 20 6f 66 |only whe|n out of|
|00001850| 20 61 72 65 61 0d 65 6e | 64 20 69 66 0d 0d 6d 61 | area.en|d if..ma|
|00001860| 63 72 6f 20 4d 65 6e 75 | 53 6b 75 6c 6c 0d 67 6c |cro Menu|Skull.gl|
|00001870| 6f 62 61 6c 20 47 65 6e | 64 65 72 43 61 73 74 2c |obal Gen|derCast,|
|00001880| 55 6e 64 6f 43 6e 75 6d | 0d 73 65 74 20 4d 65 6e |UndoCnum|.set Men|
|00001890| 75 50 69 63 6b 20 3d 20 | 66 61 6c 73 65 0d 72 65 |uPick = |false.re|
|000018a0| 70 65 61 74 20 77 69 74 | 68 20 69 20 3d 20 31 30 |peat wit|h i = 10|
|000018b0| 20 74 6f 20 31 32 0d 20 | 20 20 20 69 66 20 52 6f | to 12. | if Ro|
|000018c0| 6c 6c 6f 76 65 72 28 69 | 29 20 74 68 65 6e 0d 20 |llover(i|) then. |
|000018d0| 20 20 20 20 20 20 20 73 | 65 74 20 74 68 65 20 63 | s|et the c|
|000018e0| 61 73 74 4e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astNum o|f sprite|
|000018f0| 20 32 20 74 6f 20 47 65 | 6e 64 65 72 43 61 73 74 | 2 to Ge|nderCast|
|00001900| 20 2b 20 41 31 36 20 2b | 20 69 20 2d 20 31 30 0d | + A16 +| i - 10.|
|00001910| 20 20 20 20 20 20 20 20 | 73 65 74 20 4d 65 6e 75 | |set Menu|
|00001920| 50 69 63 6b 20 3d 20 74 | 72 75 65 0d 20 20 20 20 |Pick = t|rue. |
|00001930| 20 20 20 20 65 78 69 74 | 20 72 65 70 65 61 74 0d | exit| repeat.|
|00001940| 20 20 20 20 65 6e 64 20 | 69 66 0d 65 6e 64 20 72 | end |if.end r|
|00001950| 65 70 65 61 74 0d 69 66 | 20 4d 65 6e 75 50 69 63 |epeat.if| MenuPic|
|00001960| 6b 20 3d 20 66 61 6c 73 | 65 20 74 68 65 6e 20 73 |k = fals|e then s|
|00001970| 65 74 20 74 68 65 20 63 | 61 73 74 4e 75 6d 20 6f |et the c|astNum o|
|00001980| 66 20 73 70 72 69 74 65 | 20 32 20 74 6f 20 55 6e |f sprite| 2 to Un|
|00001990| 64 6f 43 6e 75 6d 20 2d | 2d 20 72 65 76 65 72 74 |doCnum -|- revert|
|000019a0| 0d 0d 6d 61 63 72 6f 20 | 55 6e 64 6f 42 75 66 41 |..macro |UndoBufA|
|000019b0| 63 63 65 73 0d 67 6c 6f | 62 61 6c 20 55 6e 64 6f |cces.glo|bal Undo|
|000019c0| 43 6e 75 6d 2c 20 55 6e | 64 6f 43 38 2c 55 6e 64 |Cnum, Un|doC8,Und|
|000019d0| 6f 43 39 0d 73 65 74 20 | 55 6e 64 6f 43 6e 75 6d |oC9.set |UndoCnum|
|000019e0| 20 3d 20 30 0d 73 65 74 | 20 55 6e 64 6f 43 38 20 | = 0.set| UndoC8 |
|000019f0| 3d 20 74 68 65 20 63 61 | 73 74 4e 75 6d 20 6f 66 |= the ca|stNum of|
|00001a00| 20 73 70 72 69 74 65 20 | 38 0d 73 65 74 20 55 6e | sprite |8.set Un|
|00001a10| 64 6f 43 39 20 3d 20 74 | 68 65 20 63 61 73 74 4e |doC9 = t|he castN|
|00001a20| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 39 0d 0d |um of sp|rite 9..|
|00001a30| 6d 61 63 72 6f 20 4d 65 | 6e 75 41 63 63 65 73 0d |macro Me|nuAcces.|
|00001a40| 67 6c 6f 62 61 6c 20 47 | 65 6e 64 65 72 43 61 73 |global G|enderCas|
|00001a50| 74 2c 20 55 6e 64 6f 43 | 38 2c 55 6e 64 6f 43 39 |t, UndoC|8,UndoC9|
|00001a60| 0d 73 65 74 20 4d 65 6e | 75 50 69 63 6b 20 3d 20 |.set Men|uPick = |
|00001a70| 66 61 6c 73 65 0d 72 65 | 70 65 61 74 20 77 69 74 |false.re|peat wit|
|00001a80| 68 20 69 20 3d 20 31 30 | 20 74 6f 20 31 33 0d 20 |h i = 10| to 13. |
|00001a90| 20 20 20 69 66 20 52 6f | 6c 6c 6f 76 65 72 28 69 | if Ro|llover(i|
|00001aa0| 29 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 73 |) then. | s|
|00001ab0| 65 74 20 74 68 65 20 63 | 61 73 74 4e 75 6d 20 6f |et the c|astNum o|
|00001ac0| 66 20 73 70 72 69 74 65 | 20 38 20 74 6f 20 47 65 |f sprite| 8 to Ge|
|00001ad0| 6e 64 65 72 43 61 73 74 | 20 2b 20 41 32 31 20 2b |nderCast| + A21 +|
|00001ae0| 20 69 20 2d 20 31 30 0d | 20 20 20 20 20 20 20 20 | i - 10.| |
|00001af0| 73 65 74 20 4d 65 6e 75 | 50 69 63 6b 20 3d 20 74 |set Menu|Pick = t|
|00001b00| 72 75 65 0d 20 20 20 20 | 20 20 20 20 65 78 69 74 |rue. | exit|
|00001b10| 20 72 65 70 65 61 74 0d | 20 20 20 20 65 6e 64 20 | repeat.| end |
|00001b20| 69 66 0d 65 6e 64 20 72 | 65 70 65 61 74 0d 69 66 |if.end r|epeat.if|
|00001b30| 20 52 6f 6c 6c 6f 76 65 | 72 28 31 34 29 20 74 68 | Rollove|r(14) th|
|00001b40| 65 6e 0d 20 20 20 20 73 | 65 74 20 74 68 65 20 63 |en. s|et the c|
|00001b50| 61 73 74 4e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astNum o|f sprite|
|00001b60| 20 38 20 74 6f 20 20 44 | 33 34 20 2d 2d 20 28 20 | 8 to D|34 -- ( |
|00001b70| 6f 66 66 20 73 63 72 65 | 65 6e 20 64 6f 74 29 20 |off scre|en dot) |
|00001b80| 6e 6f 20 67 6c 61 73 73 | 65 73 20 62 75 74 74 6f |no glass|es butto|
|00001b90| 6e 0d 20 20 20 20 73 65 | 74 20 4d 65 6e 75 50 69 |n. se|t MenuPi|
|00001ba0| 63 6b 20 3d 20 74 72 75 | 65 0d 65 6e 64 20 69 66 |ck = tru|e.end if|
|00001bb0| 0d 69 66 20 4d 65 6e 75 | 50 69 63 6b 20 74 68 65 |.if Menu|Pick the|
|00001bc0| 6e 0d 20 20 20 20 65 78 | 69 74 0d 65 6c 73 65 0d |n. ex|it.else.|
|00001bd0| 20 20 20 20 73 65 74 20 | 74 68 65 20 63 61 73 74 | set |the cast|
|00001be0| 4e 75 6d 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |Num of s|prite 8 |
|00001bf0| 74 6f 20 55 6e 64 6f 43 | 38 0d 65 6e 64 20 69 66 |to UndoC|8.end if|
|00001c00| 0d 72 65 70 65 61 74 20 | 77 69 74 68 20 69 20 3d |.repeat |with i =|
|00001c10| 20 31 35 20 74 6f 20 31 | 36 0d 20 20 20 20 69 66 | 15 to 1|6. if|
|00001c20| 20 52 6f 6c 6c 6f 76 65 | 72 28 69 29 20 74 68 65 | Rollove|r(i) the|
|00001c30| 6e 0d 20 20 20 20 20 20 | 20 20 73 65 74 20 74 68 |n. | set th|
|00001c40| 65 20 63 61 73 74 4e 75 | 6d 20 6f 66 20 73 70 72 |e castNu|m of spr|
|00001c50| 69 74 65 20 39 20 74 6f | 20 47 65 6e 64 65 72 43 |ite 9 to| GenderC|
|00001c60| 61 73 74 20 2b 20 41 32 | 35 20 2b 20 69 20 2d 20 |ast + A2|5 + i - |
|00001c70| 31 35 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 4d |15. | set M|
|00001c80| 65 6e 75 50 69 63 6b 20 | 3d 20 74 72 75 65 0d 20 |enuPick |= true. |
|00001c90| 20 20 20 20 20 20 20 65 | 78 69 74 20 72 65 70 65 | e|xit repe|
|00001ca0| 61 74 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 65 6e |at. e|nd if.en|
|00001cb0| 64 20 72 65 70 65 61 74 | 0d 69 66 20 52 6f 6c 6c |d repeat|.if Roll|
|00001cc0| 6f 76 65 72 28 31 37 29 | 20 74 68 65 6e 0d 20 20 |over(17)| then. |
|00001cd0| 20 20 73 65 74 20 74 68 | 65 20 63 61 73 74 4e 75 | set th|e castNu|
|00001ce0| 6d 20 6f 66 20 73 70 72 | 69 74 65 20 39 20 74 6f |m of spr|ite 9 to|
|00001cf0| 20 20 44 33 34 20 2d 2d | 20 28 20 6f 66 66 20 73 | D34 --| ( off s|
|00001d00| 63 72 65 65 6e 20 64 6f | 74 29 20 6e 6f 20 73 6d |creen do|t) no sm|
|00001d10| 6f 6b 65 0d 20 20 20 20 | 73 65 74 20 4d 65 6e 75 |oke. |set Menu|
|00001d20| 50 69 63 6b 20 3d 20 74 | 72 75 65 0d 65 6e 64 20 |Pick = t|rue.end |
|00001d30| 69 66 0d 20 69 66 20 6e | 6f 74 20 4d 65 6e 75 50 |if. if n|ot MenuP|
|00001d40| 69 63 6b 20 74 68 65 6e | 20 73 65 74 20 74 68 65 |ick then| set the|
|00001d50| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|00001d60| 74 65 20 39 20 74 6f 20 | 55 6e 64 6f 43 39 0d 0d |te 9 to |UndoC9..|
|00001d70| 6d 61 63 72 6f 20 53 65 | 74 45 79 65 20 53 69 64 |macro Se|tEye Sid|
|00001d80| 65 0d 67 6c 6f 62 61 6c | 20 47 65 6e 64 65 72 43 |e.global| GenderC|
|00001d90| 61 73 74 2c 55 6e 64 6f | 43 6e 75 6d 0d 69 66 20 |ast,Undo|Cnum.if |
|00001da0| 52 6f 6c 6c 4f 76 65 72 | 28 31 30 29 20 74 68 65 |RollOver|(10) the|
|00001db0| 6e 0d 69 66 20 73 69 64 | 65 20 3d 20 31 20 74 68 |n.if sid|e = 1 th|
|00001dc0| 65 6e 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 74 |en. | set t|
|00001dd0| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|00001de0| 72 69 74 65 20 33 20 74 | 6f 20 47 65 6e 64 65 72 |rite 3 t|o Gender|
|00001df0| 43 61 73 74 20 2b 20 41 | 34 31 20 2b 20 4d 65 6e |Cast + A|41 + Men|
|00001e00| 75 45 79 65 28 29 0d 20 | 20 20 20 65 6c 73 65 20 |uEye(). | else |
|00001e10| 2d 2d 20 73 69 64 65 20 | 3d 20 32 20 3d 20 6c 65 |-- side |= 2 = le|
|00001e20| 66 74 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 74 |ft. | set t|
|00001e30| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|00001e40| 72 69 74 65 20 34 20 74 | 6f 20 47 65 6e 64 65 72 |rite 4 t|o Gender|
|00001e50| 43 61 73 74 20 2b 20 41 | 38 31 20 2b 20 4d 65 6e |Cast + A|81 + Men|
|00001e60| 75 45 79 65 28 29 0d 20 | 20 20 20 65 6e 64 20 69 |uEye(). | end i|
|00001e70| 66 0d 65 6c 73 65 0d 20 | 20 20 20 73 65 74 20 74 |f.else. | set t|
|00001e80| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|00001e90| 72 69 74 65 20 28 53 69 | 64 65 20 2b 20 32 29 20 |rite (Si|de + 2) |
|00001ea0| 74 6f 20 55 6e 64 6f 43 | 6e 75 6d 20 2d 2d 20 72 |to UndoC|num -- r|
|00001eb0| 65 76 65 72 74 0d 65 6e | 64 20 69 66 0d 0d 6d 61 |evert.en|d if..ma|
|00001ec0| 63 72 6f 20 4d 65 6e 75 | 45 79 65 0d 69 66 20 72 |cro Menu|Eye.if r|
|00001ed0| 6f 6c 6c 6f 76 65 72 28 | 31 30 29 20 74 68 65 6e |ollover(|10) then|
|00001ee0| 0d 73 65 74 20 52 6f 77 | 20 3d 20 28 74 68 65 20 |.set Row| = (the |
|00001ef0| 6d 6f 75 73 65 56 20 2d | 20 74 68 65 20 74 6f 70 |mouseV -| the top|
|00001f00| 20 6f 66 20 73 70 72 69 | 74 65 20 31 30 29 20 2f | of spri|te 10) /|
|00001f10| 33 36 0d 73 65 74 20 43 | 6f 6c 75 6d 6e 20 3d 20 |36.set C|olumn = |
|00001f20| 28 74 68 65 20 6d 6f 75 | 73 65 48 20 2d 20 74 68 |(the mou|seH - th|
|00001f30| 65 20 4c 65 66 74 20 6f | 66 20 73 70 72 69 74 65 |e Left o|f sprite|
|00001f40| 20 31 30 20 2d 20 32 29 | 20 2f 33 38 20 2a 20 35 | 10 - 2)| /38 * 5|
|00001f50| 0d 72 65 74 75 72 6e 20 | 52 6f 77 20 2b 20 43 6f |.return |Row + Co|
|00001f60| 6c 75 6d 6e 0d 65 6c 73 | 65 0d 72 65 74 75 72 6e |lumn.els|e.return|
|00001f70| 20 30 20 2d 2d 20 63 61 | 6c 6c 65 72 20 6d 75 73 | 0 -- ca|ller mus|
|00001f80| 74 20 74 65 73 74 0d 65 | 6e 64 20 69 66 0d 0d 6d |t test.e|nd if..m|
|00001f90| 61 63 72 6f 20 4d 65 6e | 75 4d 6f 75 74 68 0d 67 |acro Men|uMouth.g|
|00001fa0| 6c 6f 62 61 6c 20 47 65 | 6e 64 65 72 43 61 73 74 |lobal Ge|nderCast|
|00001fb0| 2c 55 6e 64 6f 43 6e 75 | 6d 0d 69 66 20 72 6f 6c |,UndoCnu|m.if rol|
|00001fc0| 6c 6f 76 65 72 28 31 30 | 29 20 20 74 68 65 6e 0d |lover(10|) then.|
|00001fd0| 73 65 74 20 52 6f 77 20 | 3d 20 28 74 68 65 20 6d |set Row |= (the m|
|00001fe0| 6f 75 73 65 56 20 2d 20 | 74 68 65 20 74 6f 70 20 |ouseV - |the top |
|00001ff0| 6f 66 20 73 70 72 69 74 | 65 20 31 30 29 20 2f 32 |of sprit|e 10) /2|
|00002000| 39 0d 73 65 74 20 43 6f | 6c 75 6d 6e 20 3d 20 28 |9.set Co|lumn = (|
|00002010| 74 68 65 20 6d 6f 75 73 | 65 48 20 2d 20 74 68 65 |the mous|eH - the|
|00002020| 20 4c 65 66 74 20 6f 66 | 20 73 70 72 69 74 65 20 | Left of| sprite |
|00002030| 31 30 29 20 2f 34 30 20 | 2a 20 38 0d 73 65 74 20 |10) /40 |* 8.set |
|00002040| 74 68 65 20 63 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the cast|Num of s|
|00002050| 70 72 69 74 65 20 36 20 | 74 6f 20 47 65 6e 64 65 |prite 6 |to Gende|
|00002060| 72 43 61 73 74 20 2b 20 | 42 36 31 20 2b 20 20 52 |rCast + |B61 + R|
|00002070| 6f 77 20 2b 20 43 6f 6c | 75 6d 6e 0d 65 6c 73 65 |ow + Col|umn.else|
|00002080| 0d 73 65 74 20 74 68 65 | 20 63 61 73 74 4e 75 6d |.set the| castNum|
|00002090| 20 6f 66 20 73 70 72 69 | 74 65 20 36 20 74 6f 20 | of spri|te 6 to |
|000020a0| 55 6e 64 6f 43 6e 75 6d | 0d 65 6e 64 20 69 66 0d |UndoCnum|.end if.|
|000020b0| 0d 6d 61 63 72 6f 20 4d | 65 6e 75 4e 6f 73 65 0d |.macro M|enuNose.|
|000020c0| 67 6c 6f 62 61 6c 20 47 | 65 6e 64 65 72 43 61 73 |global G|enderCas|
|000020d0| 74 2c 55 6e 64 6f 43 6e | 75 6d 0d 69 66 20 72 6f |t,UndoCn|um.if ro|
|000020e0| 6c 6c 6f 76 65 72 28 31 | 30 29 20 74 68 65 6e 0d |llover(1|0) then.|
|000020f0| 73 65 74 20 52 6f 77 20 | 3d 20 28 74 68 65 20 6d |set Row |= (the m|
|00002100| 6f 75 73 65 56 20 2d 20 | 74 68 65 20 74 6f 70 20 |ouseV - |the top |
|00002110| 6f 66 20 73 70 72 69 74 | 65 20 31 30 29 20 2f 32 |of sprit|e 10) /2|
|00002120| 33 0d 73 65 74 20 43 6f | 6c 75 6d 6e 20 3d 20 28 |3.set Co|lumn = (|
|00002130| 28 74 68 65 20 6d 6f 75 | 73 65 48 20 2d 20 74 68 |(the mou|seH - th|
|00002140| 65 20 4c 65 66 74 20 6f | 66 20 73 70 72 69 74 65 |e Left o|f sprite|
|00002150| 20 31 30 29 20 2f 33 33 | 29 20 2a 20 33 0d 73 65 | 10) /33|) * 3.se|
|00002160| 74 20 74 68 65 20 63 61 | 73 74 4e 75 6d 20 6f 66 |t the ca|stNum of|
|00002170| 20 73 70 72 69 74 65 20 | 35 20 74 6f 20 47 65 6e | sprite |5 to Gen|
|00002180| 64 65 72 43 61 73 74 20 | 2b 20 42 34 31 20 2b 20 |derCast |+ B41 + |
|00002190| 20 52 6f 77 20 2b 20 43 | 6f 6c 75 6d 6e 0d 65 6c | Row + C|olumn.el|
|000021a0| 73 65 0d 73 65 74 20 74 | 68 65 20 63 61 73 74 4e |se.set t|he castN|
|000021b0| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 35 20 74 |um of sp|rite 5 t|
|000021c0| 6f 20 55 6e 64 6f 43 6e | 75 6d 0d 65 6e 64 20 69 |o UndoCn|um.end i|
|000021d0| 66 0d 0d 6d 61 63 72 6f | 20 50 61 6e 65 6c 43 6c |f..macro| PanelCl|
|000021e0| 69 63 6b 0d 20 73 65 74 | 20 48 20 3d 20 74 68 65 |ick. set| H = the|
|000021f0| 20 6d 6f 75 73 65 48 20 | 2d 20 74 68 65 20 6c 65 | mouseH |- the le|
|00002200| 66 74 20 6f 66 20 73 70 | 72 69 74 65 20 31 39 20 |ft of sp|rite 19 |
|00002210| 2d 2d 20 72 65 6c 61 74 | 69 76 65 20 20 63 6f 75 |-- relat|ive cou|
|00002220| 6c 64 20 75 73 65 20 74 | 68 65 20 63 6c 69 63 6b |ld use t|he click|
|00002230| 6f 6e 0d 69 66 20 48 20 | 3c 3d 20 32 35 20 74 68 |on.if H |<= 25 th|
|00002240| 65 6e 0d 20 20 20 20 48 | 69 6c 69 74 65 50 20 31 |en. H|iliteP 1|
|00002250| 2c 31 2c 32 34 2c 32 32 | 2c 31 20 2d 2d 20 31 20 |,1,24,22|,1 -- 1 |
|00002260| 3d 20 6e 6f 20 68 6f 6c | 64 20 68 69 6c 69 74 65 |= no hol|d hilite|
|00002270| 0d 20 20 20 20 43 79 63 | 6c 65 46 61 63 65 73 0d |. Cyc|leFaces.|
|00002280| 65 6c 73 65 0d 20 20 20 | 20 20 69 66 20 48 20 3e |else. | if H >|
|00002290| 20 35 38 20 61 6e 64 20 | 48 20 3c 20 31 32 30 20 | 58 and |H < 120 |
|000022a0| 74 68 65 6e 20 2d 2d 20 | 63 6c 6f 6e 65 0d 20 20 |then -- |clone. |
|000022b0| 20 20 20 20 20 20 48 69 | 6c 69 74 65 50 20 35 39 | Hi|liteP 59|
|000022c0| 2c 31 2c 31 31 38 2c 32 | 32 0d 20 20 20 20 20 20 |,1,118,2|2. |
|000022d0| 20 20 41 64 64 46 61 63 | 65 0d 20 20 20 20 65 6c | AddFac|e. el|
|000022e0| 73 65 0d 20 20 20 20 20 | 20 20 20 69 66 20 48 20 |se. | if H |
|000022f0| 3e 20 31 35 34 20 61 6e | 64 20 48 20 3c 20 32 31 |> 154 an|d H < 21|
|00002300| 36 20 74 68 65 6e 20 0d | 20 20 20 20 20 20 20 20 |6 then .| |
|00002310| 20 20 20 20 48 69 6c 69 | 74 65 50 20 31 35 35 2c | Hili|teP 155,|
|00002320| 31 2c 32 31 34 2c 32 32 | 0d 20 20 20 20 20 20 20 |1,214,22|. |
|00002330| 20 20 20 20 20 4d 61 6b | 65 46 65 6d 61 6c 65 0d | Mak|eFemale.|
|00002340| 20 20 20 20 20 20 20 20 | 65 6c 73 65 20 2d 2d 20 | |else -- |
|00002350| 61 73 73 75 6d 65 20 69 | 74 27 73 20 6c 61 73 74 |assume i|t's last|
|00002360| 20 28 4d 41 4c 45 29 20 | 62 75 74 74 6f 6e 0d 20 | (MALE) |button. |
|00002370| 20 20 20 20 20 20 20 20 | 20 20 20 48 69 6c 69 74 | | Hilit|
|00002380| 65 50 20 32 31 39 2c 31 | 2c 32 37 38 2c 32 32 0d |eP 219,1|,278,22.|
|00002390| 20 20 20 20 20 20 20 20 | 20 20 20 20 4d 61 6b 65 | | Make|
|000023a0| 4d 61 6c 65 0d 20 20 20 | 20 20 20 20 20 65 6e 64 |Male. | end|
|000023b0| 20 69 66 0d 20 20 20 20 | 65 6e 64 20 69 66 0d 65 | if. |end if.e|
|000023c0| 6e 64 20 69 66 0d 20 20 | 20 20 20 20 20 20 20 20 |nd if. | |
|000023d0| 20 20 0d 6d 61 63 72 6f | 20 43 79 63 6c 65 46 61 | .macro| CycleFa|
|000023e0| 63 65 73 0d 2d 2d 20 6e | 6f 74 68 69 6e 67 20 79 |ces.-- n|othing y|
|000023f0| 65 74 0d 67 6c 6f 62 61 | 6c 20 53 61 76 65 41 72 |et.globa|l SaveAr|
|00002400| 72 61 79 2c 47 65 6e 64 | 65 72 53 79 6d 0d 67 6c |ray,Gend|erSym.gl|
|00002410| 6f 62 61 6c 20 53 61 76 | 65 43 6f 75 6e 74 46 2c |obal Sav|eCountF,|
|00002420| 43 75 72 72 65 6e 74 46 | 61 63 65 46 2c 53 61 76 |CurrentF|aceF,Sav|
|00002430| 65 43 6f 75 6e 74 4d 2c | 43 75 72 72 65 6e 74 46 |eCountM,|CurrentF|
|00002440| 61 63 65 4d 0d 69 66 20 | 47 65 6e 64 65 72 53 79 |aceM.if |GenderSy|
|00002450| 6d 20 3d 20 22 66 22 20 | 74 68 65 6e 0d 20 73 65 |m = "f" |then. se|
|00002460| 74 20 45 6e 64 46 20 3d | 20 53 61 76 65 43 6f 75 |t EndF =| SaveCou|
|00002470| 6e 74 46 0d 73 65 74 20 | 43 20 3d 20 43 75 72 72 |ntF.set |C = Curr|
|00002480| 65 6e 74 46 61 63 65 46 | 0d 73 65 74 20 47 50 20 |entFaceF|.set GP |
|00002490| 3d 20 30 0d 65 6c 73 65 | 0d 20 73 65 74 20 45 6e |= 0.else|. set En|
|000024a0| 64 46 20 3d 20 53 61 76 | 65 43 6f 75 6e 74 4d 0d |dF = Sav|eCountM.|
|000024b0| 73 65 74 20 43 20 3d 20 | 43 75 72 72 65 6e 74 46 |set C = |CurrentF|
|000024c0| 61 63 65 4d 20 0d 73 65 | 74 20 47 50 20 3d 20 31 |aceM .se|t GP = 1|
|000024d0| 32 0d 65 6e 64 20 69 66 | 0d 73 65 74 20 69 20 3d |2.end if|.set i =|
|000024e0| 20 43 20 2d 2d 20 73 74 | 61 72 74 20 61 74 20 63 | C -- st|art at c|
|000024f0| 75 72 72 65 6e 74 20 70 | 6f 73 0d 72 65 70 65 61 |urrent p|os.repea|
|00002500| 74 20 77 68 69 6c 65 20 | 74 68 65 20 6d 6f 75 73 |t while |the mous|
|00002510| 65 44 6f 77 6e 20 2d 2d | 20 73 65 71 75 65 6e 63 |eDown --| sequenc|
|00002520| 65 20 66 61 63 65 20 64 | 69 73 70 6c 61 79 0d 73 |e face d|isplay.s|
|00002530| 65 74 20 45 54 20 3d 20 | 74 68 65 20 74 69 63 6b |et ET = |the tick|
|00002540| 73 20 2b 20 31 30 0d 52 | 65 63 61 6c 6c 46 61 63 |s + 10.R|ecallFac|
|00002550| 65 20 69 20 2b 20 47 50 | 0d 73 65 74 20 74 68 65 |e i + GP|.set the|
|00002560| 20 6c 6f 63 48 20 6f 66 | 20 73 70 72 69 74 65 20 | locH of| sprite |
|00002570| 32 30 20 74 6f 20 74 68 | 65 20 6c 65 66 74 20 6f |20 to th|e left o|
|00002580| 66 20 73 70 72 69 74 65 | 20 32 32 20 2b 20 20 28 |f sprite| 22 + (|
|00002590| 69 20 2d 20 31 29 20 2a | 20 32 33 20 2b 20 31 32 |i - 1) *| 23 + 12|
|000025a0| 20 0d 75 70 64 61 74 65 | 53 74 61 67 65 0d 73 65 | .update|Stage.se|
|000025b0| 74 20 69 20 3d 20 69 20 | 2b 20 31 0d 69 66 20 69 |t i = i |+ 1.if i|
|000025c0| 20 3e 20 45 6e 64 46 20 | 74 68 65 6e 20 73 65 74 | > EndF |then set|
|000025d0| 20 69 20 3d 20 31 0d 72 | 65 70 65 61 74 20 77 68 | i = 1.r|epeat wh|
|000025e0| 69 6c 65 20 74 68 65 20 | 74 69 63 6b 73 20 3c 20 |ile the |ticks < |
|000025f0| 45 54 20 2d 2d 20 66 72 | 61 6d 65 20 72 61 74 65 |ET -- fr|ame rate|
|00002600| 20 64 65 6c 61 79 0d 65 | 6e 64 20 72 65 70 65 61 | delay.e|nd repea|
|00002610| 74 0d 65 6e 64 20 72 65 | 70 65 61 74 0d 52 65 63 |t.end re|peat.Rec|
|00002620| 61 6c 6c 46 61 63 65 20 | 43 20 2b 20 47 50 20 2d |allFace |C + GP -|
|00002630| 2d 20 72 65 73 74 6f 72 | 65 20 63 75 72 72 65 6e |- restor|e curren|
|00002640| 74 0d 2d 2d 67 6f 20 74 | 6f 20 66 72 61 6d 65 20 |t.--go t|o frame |
|00002650| 66 72 61 6d 65 28 29 0d | 73 65 74 20 74 68 65 20 |frame().|set the |
|00002660| 70 75 70 70 65 74 20 6f | 66 20 73 70 72 69 74 65 |puppet o|f sprite|
|00002670| 20 32 34 20 74 6f 20 66 | 61 6c 73 65 20 2d 2d 20 | 24 to f|alse -- |
|00002680| 75 6e 68 69 6c 69 74 65 | 0d 73 65 74 20 74 68 65 |unhilite|.set the|
|00002690| 20 6c 6f 63 48 20 6f 66 | 20 73 70 72 69 74 65 20 | locH of| sprite |
|000026a0| 32 30 20 74 6f 20 74 68 | 65 20 6c 65 66 74 20 6f |20 to th|e left o|
|000026b0| 66 20 73 70 72 69 74 65 | 20 32 32 20 2b 20 20 28 |f sprite| 22 + (|
|000026c0| 43 20 2d 20 31 29 20 2a | 20 32 33 20 2b 20 31 32 |C - 1) *| 23 + 12|
|000026d0| 20 2d 2d 20 72 65 73 74 | 6f 72 65 20 61 72 72 6f | -- rest|ore arro|
|000026e0| 77 0d 67 6f 20 74 6f 20 | 74 68 65 20 66 72 61 6d |w.go to |the fram|
|000026f0| 65 0d 0d 0d 6d 61 63 72 | 6f 20 48 69 6c 69 74 65 |e...macr|o Hilite|
|00002700| 50 20 4c 2c 54 2c 52 2c | 42 2c 20 68 6f 6c 64 0d |P L,T,R,|B, hold.|
|00002710| 73 65 74 20 74 68 65 20 | 70 75 70 70 65 74 20 6f |set the |puppet o|
|00002720| 66 20 73 70 72 69 74 65 | 20 32 34 20 74 6f 20 74 |f sprite| 24 to t|
|00002730| 72 75 65 0d 73 65 74 20 | 50 4c 20 3d 20 74 68 65 |rue.set |PL = the|
|00002740| 20 6c 65 66 74 20 6f 66 | 20 73 70 72 69 74 65 20 | left of| sprite |
|00002750| 31 39 20 2d 2d 20 62 74 | 6e 20 70 61 6e 65 6c 0d |19 -- bt|n panel.|
|00002760| 73 65 74 20 50 54 20 3d | 20 74 68 65 20 74 6f 70 |set PT =| the top|
|00002770| 20 6f 66 20 73 70 72 69 | 74 65 20 31 39 0d 73 70 | of spri|te 19.sp|
|00002780| 72 69 74 65 42 6f 78 20 | 32 34 2c 4c 20 2b 20 50 |riteBox |24,L + P|
|00002790| 4c 2c 20 54 20 2b 20 50 | 54 2c 20 52 20 2b 20 50 |L, T + P|T, R + P|
|000027a0| 4c 2c 20 42 20 2b 20 50 | 54 0d 75 70 64 61 74 65 |L, B + P|T.update|
|000027b0| 53 74 61 67 65 0d 69 66 | 20 6e 6f 74 20 69 6e 74 |Stage.if| not int|
|000027c0| 65 67 65 72 70 28 68 6f | 6c 64 29 20 74 68 65 6e |egerp(ho|ld) then|
|000027d0| 20 2d 2d 20 73 6b 69 70 | 20 72 65 6c 65 61 73 65 | -- skip| release|
|000027e0| 20 61 66 74 65 72 20 6d | 6f 75 73 65 75 70 2c 20 | after m|ouseup, |
|000027f0| 6d 6f 64 65 20 66 6f 72 | 20 63 79 63 6c 65 20 62 |mode for| cycle b|
|00002800| 75 74 74 6f 6e 0d 72 65 | 70 65 61 74 20 77 68 69 |utton.re|peat whi|
|00002810| 6c 65 20 74 68 65 20 6d | 6f 75 73 65 44 6f 77 6e |le the m|ouseDown|
|00002820| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 73 65 74 20 |.end rep|eat.set |
|00002830| 74 68 65 20 70 75 70 70 | 65 74 20 6f 66 20 73 70 |the pupp|et of sp|
|00002840| 72 69 74 65 20 32 34 20 | 74 6f 20 66 61 6c 73 65 |rite 24 |to false|
|00002850| 20 2d 2d 20 75 6e 68 69 | 6c 69 74 65 0d 67 6f 20 | -- unhi|lite.go |
|00002860| 74 6f 20 74 68 65 20 66 | 72 61 6d 65 0d 65 6e 64 |to the f|rame.end|
|00002870| 20 69 66 0d 0d 2d 2d 20 | 70 61 6e 65 6c 20 62 74 | if..-- |panel bt|
|00002880| 6e 20 6f 66 66 73 65 74 | 73 2c 20 68 61 6e 64 20 |n offset|s, hand |
|00002890| 6d 65 61 73 75 72 65 64 | 0d 2d 2d 20 22 32 35 20 |measured|.-- "25 |
|000028a0| 32 33 22 20 63 79 63 6c | 65 20 4c 52 0d 2d 2d 20 |23" cycl|e LR.-- |
|000028b0| 22 35 39 20 31 22 20 20 | 63 6c 6f 6e 65 20 55 4c |"59 1" |clone UL|
|000028c0| 0d 2d 2d 20 22 31 31 39 | 20 32 34 22 20 63 6c 6f |.-- "119| 24" clo|
|000028d0| 6e 65 20 4c 52 0d 2d 2d | 20 22 31 35 35 20 31 22 |ne LR.--| "155 1"|
|000028e0| 20 20 46 45 4d 20 55 4c | 0d 2d 2d 20 22 32 31 35 | FEM UL|.-- "215|
|000028f0| 20 32 34 22 20 66 65 6d | 20 4c 52 0d 2d 2d 20 22 | 24" fem| LR.-- "|
|00002900| 32 31 39 20 32 22 20 20 | 20 4d 41 4c 45 20 20 55 |219 2" | MALE U|
|00002910| 4c 0d 2d 2d 20 22 32 37 | 39 20 32 34 22 20 20 4d |L.-- "27|9 24" M|
|00002920| 41 4c 45 20 4c 52 0d 0d | 6d 61 63 72 6f 20 41 64 |ALE LR..|macro Ad|
|00002930| 64 46 61 63 65 0d 67 6c | 6f 62 61 6c 20 53 61 76 |dFace.gl|obal Sav|
|00002940| 65 43 6f 75 6e 74 46 2c | 43 75 72 72 65 6e 74 46 |eCountF,|CurrentF|
|00002950| 61 63 65 46 2c 53 61 76 | 65 43 6f 75 6e 74 4d 2c |aceF,Sav|eCountM,|
|00002960| 43 75 72 72 65 6e 74 46 | 61 63 65 4d 2c 53 61 76 |CurrentF|aceM,Sav|
|00002970| 65 41 72 72 61 79 2c 47 | 65 6e 64 65 72 53 79 6d |eArray,G|enderSym|
|00002980| 0d 69 66 20 47 65 6e 64 | 65 72 53 79 6d 20 3d 20 |.if Gend|erSym = |
|00002990| 22 66 22 20 74 68 65 6e | 20 0d 20 20 20 20 69 66 |"f" then| . if|
|000029a0| 20 53 61 76 65 43 6f 75 | 6e 74 46 20 3e 3d 20 31 | SaveCou|ntF >= 1|
|000029b0| 32 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 62 |2 then. | b|
|000029c0| 65 65 70 0d 20 20 20 20 | 20 20 20 20 65 78 69 74 |eep. | exit|
|000029d0| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 |. end| if. |
|000029e0| 73 65 74 20 53 61 76 65 | 43 6f 75 6e 74 46 20 3d |set Save|CountF =|
|000029f0| 20 53 61 76 65 43 6f 75 | 6e 74 46 20 2b 20 31 0d | SaveCou|ntF + 1.|
|00002a00| 20 20 20 20 73 65 74 20 | 43 75 72 72 65 6e 74 46 | set |CurrentF|
|00002a10| 61 63 65 46 20 3d 20 53 | 61 76 65 43 6f 75 6e 74 |aceF = S|aveCount|
|00002a20| 46 0d 20 20 20 20 53 65 | 74 46 61 63 65 43 6f 75 |F. Se|tFaceCou|
|00002a30| 6e 74 42 61 72 20 53 61 | 76 65 43 6f 75 6e 74 46 |ntBar Sa|veCountF|
|00002a40| 2c 20 43 75 72 72 65 6e | 74 46 61 63 65 46 0d 20 |, Curren|tFaceF. |
|00002a50| 20 20 20 53 61 76 65 46 | 61 63 65 44 61 74 61 20 | SaveF|aceData |
|00002a60| 53 61 76 65 43 6f 75 6e | 74 46 0d 65 6c 73 65 20 |SaveCoun|tF.else |
|00002a70| 2d 2d 20 6d 61 6c 65 20 | 66 61 63 65 20 73 65 74 |-- male |face set|
|00002a80| 0d 20 20 20 20 69 66 20 | 53 61 76 65 43 6f 75 6e |. if |SaveCoun|
|00002a90| 74 4d 20 3e 3d 20 31 32 | 20 74 68 65 6e 0d 20 20 |tM >= 12| then. |
|00002aa0| 20 20 20 20 20 20 62 65 | 65 70 0d 20 20 20 20 20 | be|ep. |
|00002ab0| 20 20 20 65 78 69 74 0d | 20 20 20 20 65 6e 64 20 | exit.| end |
|00002ac0| 69 66 0d 20 20 20 20 73 | 65 74 20 53 61 76 65 43 |if. s|et SaveC|
|00002ad0| 6f 75 6e 74 4d 20 3d 20 | 53 61 76 65 43 6f 75 6e |ountM = |SaveCoun|
|00002ae0| 74 4d 20 2b 20 31 0d 20 | 20 20 20 73 65 74 20 43 |tM + 1. | set C|
|00002af0| 75 72 72 65 6e 74 46 61 | 63 65 4d 20 3d 20 53 61 |urrentFa|ceM = Sa|
|00002b00| 76 65 43 6f 75 6e 74 4d | 0d 20 20 20 20 53 65 74 |veCountM|. Set|
|00002b10| 46 61 63 65 43 6f 75 6e | 74 42 61 72 20 53 61 76 |FaceCoun|tBar Sav|
|00002b20| 65 43 6f 75 6e 74 4d 2c | 20 43 75 72 72 65 6e 74 |eCountM,| Current|
|00002b30| 46 61 63 65 4d 0d 20 20 | 20 20 53 61 76 65 46 61 |FaceM. | SaveFa|
|00002b40| 63 65 44 61 74 61 20 53 | 61 76 65 43 6f 75 6e 74 |ceData S|aveCount|
|00002b50| 4d 20 2b 20 31 32 20 2d | 2d 20 6f 66 66 73 65 74 |M + 12 -|- offset|
|00002b60| 20 66 6f 72 20 6d 61 6c | 65 0d 65 6e 64 20 69 66 | for mal|e.end if|
|00002b70| 0d 0d 6d 61 63 72 6f 20 | 53 65 74 46 61 63 65 43 |..macro |SetFaceC|
|00002b80| 6f 75 6e 74 42 61 72 20 | 53 61 76 65 43 6f 75 6e |ountBar |SaveCoun|
|00002b90| 74 2c 43 75 72 72 65 6e | 74 0d 20 2d 2d 20 72 65 |t,Curren|t. -- re|
|00002ba0| 76 65 61 6c 20 6e 65 77 | 20 66 61 63 65 20 23 0d |veal new| face #.|
|00002bb0| 20 20 20 20 2d 2d 73 65 | 74 20 74 68 65 20 6c 6f | --se|t the lo|
|00002bc0| 63 48 20 6f 66 20 73 70 | 72 69 74 65 20 32 33 20 |cH of sp|rite 23 |
|00002bd0| 74 6f 20 74 68 65 20 6c | 65 66 74 20 6f 66 20 73 |to the l|eft of s|
|00002be0| 70 72 69 74 65 20 32 32 | 20 2b 20 53 61 76 65 43 |prite 22| + SaveC|
|00002bf0| 6f 75 6e 74 20 2a 20 32 | 33 20 2b 20 31 20 2d 2d |ount * 2|3 + 1 --|
|00002c00| 20 6d 61 73 6b 0d 73 65 | 74 20 4c 20 3d 20 74 68 | mask.se|t L = th|
|00002c10| 65 20 6c 65 66 74 20 6f | 66 20 73 70 72 69 74 65 |e left o|f sprite|
|00002c20| 20 32 32 20 2b 20 53 61 | 76 65 43 6f 75 6e 74 20 | 22 + Sa|veCount |
|00002c30| 2a 20 32 33 20 2b 20 31 | 20 2d 2d 20 63 68 61 6e |* 23 + 1| -- chan|
|00002c40| 67 65 20 6f 6e 6c 79 20 | 6c 65 66 74 20 65 64 67 |ge only |left edg|
|00002c50| 65 20 6f 66 20 6d 61 73 | 6b 0d 73 70 72 69 74 65 |e of mas|k.sprite|
|00002c60| 62 6f 78 20 32 33 2c 20 | 4c 2c 20 74 68 65 20 74 |box 23, |L, the t|
|00002c70| 6f 70 20 6f 66 20 73 70 | 72 69 74 65 20 32 33 2c |op of sp|rite 23,|
|00002c80| 20 74 68 65 20 72 69 67 | 68 74 20 6f 66 20 73 70 | the rig|ht of sp|
|00002c90| 72 69 74 65 20 32 33 2c | 20 74 68 65 20 62 6f 74 |rite 23,| the bot|
|00002ca0| 74 6f 6d 20 6f 66 20 73 | 70 72 69 74 65 20 32 33 |tom of s|prite 23|
|00002cb0| 0d 20 2d 2d 20 27 73 61 | 76 65 27 20 62 74 6e 0d |. -- 'sa|ve' btn.|
|00002cc0| 73 65 74 20 74 68 65 20 | 6c 6f 63 48 20 6f 66 20 |set the |locH of |
|00002cd0| 73 70 72 69 74 65 20 32 | 30 20 74 6f 20 74 68 65 |sprite 2|0 to the|
|00002ce0| 20 6c 65 66 74 20 6f 66 | 20 73 70 72 69 74 65 20 | left of| sprite |
|00002cf0| 32 32 20 2b 20 20 28 43 | 75 72 72 65 6e 74 20 2d |22 + (C|urrent -|
|00002d00| 31 29 20 2a 20 32 33 20 | 2b 20 31 32 20 0d 65 6e |1) * 23 |+ 12 .en|
|00002d10| 64 20 69 66 0d 0d 6d 61 | 63 72 6f 20 53 61 76 65 |d if..ma|cro Save|
|00002d20| 46 61 63 65 44 61 74 61 | 20 45 6e 74 72 79 4e 75 |FaceData| EntryNu|
|00002d30| 6d 0d 67 6c 6f 62 61 6c | 20 53 61 76 65 41 72 72 |m.global| SaveArr|
|00002d40| 61 79 2c 47 65 6e 64 65 | 72 43 61 73 74 0d 70 75 |ay,Gende|rCast.pu|
|00002d50| 74 20 65 6d 70 74 79 20 | 20 69 6e 74 6f 20 64 75 |t empty | into du|
|00002d60| 6d 70 20 2d 2d 24 24 24 | 0d 72 65 70 65 61 74 20 |mp --$$$|.repeat |
|00002d70| 77 69 74 68 20 69 20 3d | 20 31 20 74 6f 20 38 0d |with i =| 1 to 8.|
|00002d80| 20 20 20 20 73 65 74 20 | 70 6f 69 6e 74 65 72 20 | set |pointer |
|00002d90| 3d 20 53 61 76 65 41 72 | 72 61 79 28 6d 47 65 74 |= SaveAr|ray(mGet|
|00002da0| 2c 69 29 0d 2d 2d 20 66 | 61 63 65 20 70 61 72 74 |,i).-- f|ace part|
|00002db0| 73 20 6e 6f 77 20 73 70 | 72 69 74 65 20 32 2d 39 |s now sp|rite 2-9|
|00002dc0| 0d 20 20 20 20 70 6f 69 | 6e 74 65 72 28 6d 50 75 |. poi|nter(mPu|
|00002dd0| 74 2c 45 6e 74 72 79 4e | 75 6d 2c 74 68 65 20 43 |t,EntryN|um,the C|
|00002de0| 61 73 74 4e 75 6d 20 6f | 66 20 73 70 72 69 74 65 |astNum o|f sprite|
|00002df0| 20 28 69 20 2b 20 31 29 | 29 20 2d 2d 20 63 75 72 | (i + 1)|) -- cur|
|00002e00| 72 65 6e 74 20 63 61 73 | 74 0d 2d 2d 70 75 74 20 |rent cas|t.--put |
|00002e10| 6e 75 6d 54 6f 43 61 73 | 74 53 79 6d 28 74 68 65 |numToCas|tSym(the|
|00002e20| 20 43 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | CastNum| of spri|
|00002e30| 74 65 20 28 69 20 2b 20 | 31 29 29 20 26 22 2c 20 |te (i + |1)) &", |
|00002e40| 22 20 61 66 74 65 72 20 | 64 75 6d 70 2d 2d 24 24 |" after |dump--$$|
|00002e50| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 2d 2d 70 75 |.end rep|eat.--pu|
|00002e60| 74 20 64 75 6d 70 20 2d | 2d 24 24 24 0d 0d 6d 61 |t dump -|-$$$..ma|
|00002e70| 63 72 6f 20 4e 75 6d 54 | 6f 43 61 73 74 53 79 6d |cro NumT|oCastSym|
|00002e80| 20 43 6e 75 6d 0d 73 65 | 74 20 43 6e 75 6d 20 3d | Cnum.se|t Cnum =|
|00002e90| 20 43 6e 75 6d 20 2d 20 | 31 0d 73 65 74 20 4c 20 | Cnum - |1.set L |
|00002ea0| 3d 20 63 68 61 72 20 28 | 43 6e 75 6d 29 20 2f 20 |= char (|Cnum) / |
|00002eb0| 36 34 20 2b 20 31 20 6f | 66 20 22 41 42 43 44 45 |64 + 1 o|f "ABCDE|
|00002ec0| 46 47 48 49 22 0d 73 65 | 74 20 4e 20 3d 20 28 20 |FGHI".se|t N = ( |
|00002ed0| 43 6e 75 6d 20 6d 6f 64 | 20 36 34 20 29 0d 73 65 |Cnum mod| 64 ).se|
|00002ee0| 74 20 54 20 3d 20 28 4e | 20 2f 20 38 29 20 2b 20 |t T = (N| / 8) + |
|00002ef0| 31 0d 73 65 74 20 53 79 | 6d 20 3d 20 4c 20 26 20 |1.set Sy|m = L & |
|00002f00| 73 74 72 69 6e 67 28 54 | 29 20 26 20 73 74 72 69 |string(T|) & stri|
|00002f10| 6e 67 28 20 28 4e 20 6d | 6f 64 20 38 29 20 2b 20 |ng( (N m|od 8) + |
|00002f20| 31 29 20 2d 2d 20 73 74 | 72 69 6e 67 28 20 28 28 |1) -- st|ring( ((|
|00002f30| 4e 20 2d 20 31 29 20 6d | 6f 64 20 38 29 20 2b 20 |N - 1) m|od 8) + |
|00002f40| 31 29 0d 72 65 74 75 72 | 6e 20 53 79 6d 0d 0d 6d |1).retur|n Sym..m|
|00002f50| 61 63 72 6f 20 64 75 6d | 70 46 61 63 65 44 61 74 |acro dum|pFaceDat|
|00002f60| 61 20 45 6e 74 72 79 4e | 75 6d 0d 67 6c 6f 62 61 |a EntryN|um.globa|
|00002f70| 6c 20 53 61 76 65 41 72 | 72 61 79 2c 47 65 6e 64 |l SaveAr|ray,Gend|
|00002f80| 65 72 43 61 73 74 0d 70 | 75 74 20 22 43 61 73 74 |erCast.p|ut "Cast|
|00002f90| 20 44 61 74 61 2c 20 65 | 6e 74 72 79 23 20 22 26 | Data, e|ntry# "&|
|00002fa0| 20 45 6e 74 72 79 4e 75 | 6d 0d 72 65 70 65 61 74 | EntryNu|m.repeat|
|00002fb0| 20 77 69 74 68 20 69 20 | 3d 20 31 20 74 6f 20 38 | with i |= 1 to 8|
|00002fc0| 0d 20 20 20 20 73 65 74 | 20 70 6f 69 6e 74 65 72 |. set| pointer|
|00002fd0| 20 3d 20 53 61 76 65 41 | 72 72 61 79 28 6d 47 65 | = SaveA|rray(mGe|
|00002fe0| 74 2c 69 29 0d 70 75 74 | 20 69 20 2b 20 31 26 26 |t,i).put| i + 1&&|
|00002ff0| 20 70 6f 69 6e 74 65 72 | 28 6d 47 65 74 2c 45 6e | pointer|(mGet,En|
|00003000| 74 72 79 4e 75 6d 29 20 | 2d 2d 20 63 75 72 72 65 |tryNum) |-- curre|
|00003010| 6e 74 20 63 61 73 74 0d | 65 6e 64 20 72 65 70 65 |nt cast.|end repe|
|00003020| 61 74 0d 0d 6d 61 63 72 | 6f 20 53 61 76 65 46 61 |at..macr|o SaveFa|
|00003030| 63 65 0d 67 6c 6f 62 61 | 6c 20 43 75 72 72 65 6e |ce.globa|l Curren|
|00003040| 74 46 61 63 65 46 2c 20 | 43 75 72 72 65 6e 74 46 |tFaceF, |CurrentF|
|00003050| 61 63 65 4d 2c 47 65 6e | 64 65 72 53 79 6d 0d 69 |aceM,Gen|derSym.i|
|00003060| 66 20 47 65 6e 64 65 72 | 53 79 6d 20 3d 20 22 66 |f Gender|Sym = "f|
|00003070| 22 20 74 68 65 6e 20 0d | 20 20 20 20 53 61 76 65 |" then .| Save|
|00003080| 46 61 63 65 44 61 74 61 | 20 43 75 72 72 65 6e 74 |FaceData| Current|
|00003090| 46 61 63 65 46 0d 65 6c | 73 65 0d 20 20 20 20 53 |FaceF.el|se. S|
|000030a0| 61 76 65 46 61 63 65 44 | 61 74 61 20 43 75 72 72 |aveFaceD|ata Curr|
|000030b0| 65 6e 74 46 61 63 65 4d | 20 2b 20 31 32 20 2d 2d |entFaceM| + 12 --|
|000030c0| 20 63 6f 6d 6d 6f 6e 20 | 61 72 72 61 79 20 6f 66 | common |array of|
|000030d0| 66 73 65 74 0d 65 6e 64 | 20 69 66 0d 0d 6d 61 63 |fset.end| if..mac|
|000030e0| 72 6f 20 72 65 63 61 6c | 6c 42 74 6e 0d 67 6c 6f |ro recal|lBtn.glo|
|000030f0| 62 61 6c 20 53 61 76 65 | 41 72 72 61 79 2c 43 75 |bal Save|Array,Cu|
|00003100| 72 72 65 6e 74 46 61 63 | 65 46 2c 43 75 72 72 65 |rrentFac|eF,Curre|
|00003110| 6e 74 46 61 63 65 4d 2c | 47 65 6e 64 65 72 53 79 |ntFaceM,|GenderSy|
|00003120| 6d 0d 73 65 74 20 46 61 | 63 65 4e 75 6d 20 3d 20 |m.set Fa|ceNum = |
|00003130| 31 20 2b 20 28 74 68 65 | 20 6d 6f 75 73 65 48 20 |1 + (the| mouseH |
|00003140| 2d 20 74 68 65 20 6c 65 | 66 74 20 6f 66 20 73 70 |- the le|ft of sp|
|00003150| 72 69 74 65 20 32 32 29 | 20 2f 20 32 33 0d 2d 2d |rite 22)| / 23.--|
|00003160| 70 75 74 20 22 46 61 63 | 65 4e 75 6d 3d 22 26 46 |put "Fac|eNum="&F|
|00003170| 61 63 65 4e 75 6d 20 2d | 2d 24 24 24 0d 2d 2d 20 |aceNum -|-$$$.-- |
|00003180| 70 6f 73 69 74 69 6f 6e | 20 27 73 61 76 65 27 20 |position| 'save' |
|00003190| 62 74 6e 20 6f 76 65 72 | 20 74 68 65 20 61 63 74 |btn over| the act|
|000031a0| 69 76 65 20 66 61 63 65 | 23 0d 73 65 74 20 74 68 |ive face|#.set th|
|000031b0| 65 20 6c 6f 63 48 20 6f | 66 20 73 70 72 69 74 65 |e locH o|f sprite|
|000031c0| 20 32 30 20 74 6f 20 74 | 68 65 20 6c 65 66 74 20 | 20 to t|he left |
|000031d0| 6f 66 20 73 70 72 69 74 | 65 20 32 32 20 2b 20 20 |of sprit|e 22 + |
|000031e0| 28 46 61 63 65 4e 75 6d | 20 2d 20 31 29 20 2a 20 |(FaceNum| - 1) * |
|000031f0| 32 33 20 2b 20 31 32 20 | 0d 69 66 20 47 65 6e 64 |23 + 12 |.if Gend|
|00003200| 65 72 53 79 6d 20 3d 20 | 22 66 22 20 74 68 65 6e |erSym = |"f" then|
|00003210| 20 0d 73 65 74 20 43 75 | 72 72 65 6e 74 46 61 63 | .set Cu|rrentFac|
|00003220| 65 46 20 3d 20 46 61 63 | 65 4e 75 6d 0d 65 6c 73 |eF = Fac|eNum.els|
|00003230| 65 20 2d 2d 20 6d 61 6c | 65 0d 73 65 74 20 43 75 |e -- mal|e.set Cu|
|00003240| 72 72 65 6e 74 46 61 63 | 65 4d 20 3d 20 46 61 63 |rrentFac|eM = Fac|
|00003250| 65 4e 75 6d 0d 73 65 74 | 20 46 61 63 65 4e 75 6d |eNum.set| FaceNum|
|00003260| 20 3d 20 46 61 63 65 4e | 75 6d 20 2b 20 31 32 20 | = FaceN|um + 12 |
|00003270| 2d 2d 20 6d 61 6c 65 20 | 61 72 65 61 20 6f 66 66 |-- male |area off|
|00003280| 73 65 74 0d 65 6e 64 20 | 69 66 20 20 20 20 0d 52 |set.end |if .R|
|00003290| 65 63 61 6c 6c 46 61 63 | 65 20 46 61 63 65 4e 75 |ecallFac|e FaceNu|
|000032a0| 6d 0d 0d 6d 61 63 72 6f | 20 52 65 63 61 6c 6c 46 |m..macro| RecallF|
|000032b0| 61 63 65 20 45 6e 74 72 | 79 4e 75 6d 0d 67 6c 6f |ace Entr|yNum.glo|
|000032c0| 62 61 6c 20 53 61 76 65 | 41 72 72 61 79 0d 2d 2d |bal Save|Array.--|
|000032d0| 73 65 74 20 69 20 3d 20 | 31 0d 2d 2d 70 75 74 20 |set i = |1.--put |
|000032e0| 22 46 61 63 65 4e 75 6d | 3d 22 26 46 61 63 65 4e |"FaceNum|="&FaceN|
|000032f0| 75 6d 20 2d 2d 24 24 24 | 0d 72 65 70 65 61 74 20 |um --$$$|.repeat |
|00003300| 77 69 74 68 20 69 20 3d | 20 31 20 74 6f 20 20 38 |with i =| 1 to 8|
|00003310| 20 74 68 65 6e 0d 20 20 | 20 73 65 74 20 50 6f 69 | then. | set Poi|
|00003320| 6e 74 65 72 20 3d 20 53 | 61 76 65 41 72 72 61 79 |nter = S|aveArray|
|00003330| 28 6d 47 65 74 2c 69 29 | 0d 20 20 20 73 65 74 20 |(mGet,i)|. set |
|00003340| 74 68 65 20 43 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the Cast|Num of s|
|00003350| 70 72 69 74 65 20 28 69 | 20 2b 20 31 29 20 3d 20 |prite (i| + 1) = |
|00003360| 20 50 6f 69 6e 74 65 72 | 28 6d 67 65 74 2c 45 6e | Pointer|(mget,En|
|00003370| 74 72 79 4e 75 6d 20 29 | 20 2d 2d 20 63 75 72 72 |tryNum )| -- curr|
|00003380| 65 6e 74 20 63 61 73 74 | 20 2b 20 31 3f 0d 20 20 |ent cast| + 1?. |
|00003390| 20 2d 2d 73 65 74 20 69 | 20 3d 20 69 20 2b 20 31 | --set i| = i + 1|
|000033a0| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 0d 6d 61 63 |.end rep|eat..mac|
|000033b0| 72 6f 20 46 61 63 65 54 | 6f 43 6c 69 70 0d 67 6c |ro FaceT|oClip.gl|
|000033c0| 6f 62 61 6c 20 78 0d 70 | 75 74 20 74 68 65 20 73 |obal x.p|ut the s|
|000033d0| 74 61 67 65 6c 65 66 74 | 20 69 6e 74 6f 20 53 4c |tageleft| into SL|
|000033e0| 20 2d 2d 20 66 6f 72 20 | 6c 6f 63 61 6c 20 74 6f | -- for |local to|
|000033f0| 20 67 6c 6f 62 61 6c 20 | 63 6f 6e 76 65 72 73 69 | global |conversi|
|00003400| 6f 6e 0d 70 75 74 20 74 | 68 65 20 73 74 61 67 65 |on.put t|he stage|
|00003410| 74 6f 70 20 69 6e 74 6f | 20 53 54 0d 2d 2d 53 69 |top into| ST.--Si|
|00003420| 7a 65 46 61 63 65 52 65 | 63 74 0d 73 65 74 20 4c |zeFaceRe|ct.set L|
|00003430| 20 3d 20 74 68 65 20 6c | 65 66 74 20 6f 66 20 73 | = the l|eft of s|
|00003440| 70 72 69 74 65 20 37 20 | 2b 20 53 4c 20 2d 2d 20 |prite 7 |+ SL -- |
|00003450| 68 61 69 72 0d 73 65 74 | 20 54 20 3d 20 74 68 65 |hair.set| T = the|
|00003460| 20 74 6f 70 20 6f 66 20 | 73 70 72 69 74 65 20 37 | top of |sprite 7|
|00003470| 20 2b 20 53 54 0d 73 65 | 74 20 52 20 3d 20 74 68 | + ST.se|t R = th|
|00003480| 65 20 72 69 67 68 74 20 | 6f 66 20 73 70 72 69 74 |e right |of sprit|
|00003490| 65 20 37 20 0d 73 65 74 | 20 42 20 3d 20 74 68 65 |e 7 .set| B = the|
|000034a0| 20 62 6f 74 74 6f 6d 20 | 6f 66 20 73 70 72 69 74 | bottom |of sprit|
|000034b0| 65 20 32 20 2b 20 53 54 | 20 2d 2d 20 73 6b 75 6c |e 2 + ST| -- skul|
|000034c0| 6c 0d 73 65 74 20 79 20 | 3d 20 78 20 2b 20 32 30 |l.set y |= x + 20|
|000034d0| 33 39 0d 69 66 20 74 68 | 65 20 72 69 67 68 74 20 |39.if th|e right |
|000034e0| 6f 66 20 73 70 72 69 74 | 65 20 39 20 3e 20 52 20 |of sprit|e 9 > R |
|000034f0| 74 68 65 6e 20 73 65 74 | 20 52 20 3d 20 74 68 65 |then set| R = the|
|00003500| 20 72 69 67 68 74 20 6f | 66 20 73 70 72 69 74 65 | right o|f sprite|
|00003510| 20 39 20 2d 2d 20 61 63 | 63 65 73 6f 72 79 20 28 | 9 -- ac|cesory (|
|00003520| 73 6d 6f 6b 65 29 0d 73 | 65 74 20 52 20 3d 20 52 |smoke).s|et R = R|
|00003530| 20 2b 20 53 4c 0d 2d 2d | 6f 70 65 6e 58 6c 69 62 | + SL.--|openXlib|
|00003540| 20 22 53 63 72 65 65 6e | 54 6f 43 6c 69 70 2e 58 | "Screen|ToClip.X|
|00003550| 4f 42 4a 22 0d 67 6c 6f | 62 61 6c 20 43 6c 69 70 |OBJ".glo|bal Clip|
|00003560| 70 65 72 0d 69 66 20 6f | 62 6a 65 63 74 70 28 43 |per.if o|bjectp(C|
|00003570| 6c 69 70 70 65 72 29 20 | 74 68 65 6e 20 43 6c 69 |lipper) |then Cli|
|00003580| 70 70 65 72 28 6d 44 69 | 73 70 6f 73 65 29 0d 73 |pper(mDi|spose).s|
|00003590| 65 74 20 43 6c 69 70 70 | 65 72 20 3d 53 63 72 65 |et Clipp|er =Scre|
|000035a0| 65 6e 54 6f 43 6c 69 70 | 28 6d 4e 65 77 2c 79 29 |enToClip|(mNew,y)|
|000035b0| 0d 73 65 74 20 78 20 3d | 20 20 43 6c 69 70 70 65 |.set x =| Clippe|
|000035c0| 72 28 6d 53 63 72 65 65 | 6e 54 6f 50 49 43 54 2c |r(mScree|nToPICT,|
|000035d0| 4c 2c 54 2c 52 2c 42 29 | 0d 43 6c 69 70 70 65 72 |L,T,R,B)|.Clipper|
|000035e0| 28 6d 50 69 63 74 54 6f | 43 6c 69 70 2c 20 78 20 |(mPictTo|Clip, x |
|000035f0| 29 20 2d 2d 20 63 6f 70 | 79 20 74 6f 20 63 6c 69 |) -- cop|y to cli|
|00003600| 70 62 6f 61 72 64 0d 43 | 6c 69 70 70 65 72 28 6d |pboard.C|lipper(m|
|00003610| 44 69 73 70 6f 73 65 29 | 20 2d 2d 20 6f 6e 65 20 |Dispose)| -- one |
|00003620| 73 68 6f 74 20 74 65 73 | 74 0d 2d 2d 43 6c 6f 73 |shot tes|t.--Clos|
|00003630| 65 58 6c 69 62 20 22 53 | 63 72 65 65 6e 54 6f 43 |eXlib "S|creenToC|
|00003640| 6c 69 70 2e 58 4f 42 4a | 22 0d 0d 0d 66 61 63 74 |lip.XOBJ|"...fact|
|00003650| 6f 72 79 20 41 72 72 61 | 79 4d 61 6b 65 72 0d 6d |ory Arra|yMaker.m|
|00003660| 65 74 68 6f 64 20 4d 6e | 65 77 00 3b 00 00 00 00 |ethod Mn|ew.;....|
|00003670| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003680| 00 00 05 eb 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00003690| 00 00 00 00 00 00 05 fa | 00 10 00 0c 00 03 00 00 |........|........|
|000036a0| 00 0c 00 00 00 00 00 00 | 00 00 0a 76 00 10 00 0c |........|...v....|
|000036b0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 0a 82 |........|........|
|000036c0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000036d0| 00 00 0b 1e 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|000036e0| 00 00 00 00 00 00 0b 28 | 00 10 00 0c 00 03 00 00 |.......(|........|
|000036f0| 00 0c 00 00 00 00 00 00 | 00 00 0b ab 00 10 00 0c |........|........|
|00003700| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 0b b7 |........|........|
|00003710| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003720| 00 00 0c 18 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00003730| 00 00 00 00 00 00 0c 20 | 00 10 00 0c 00 03 00 00 |....... |........|
|00003740| 00 0c 00 00 00 00 00 00 | 00 00 0e 8b 00 10 00 0c |........|........|
|00003750| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 0e 95 |........|........|
|00003760| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003770| 00 00 0f f4 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00003780| 00 00 00 00 00 00 10 01 | 00 10 00 0c 00 03 00 00 |........|........|
|00003790| 00 0c 00 00 00 00 00 00 | 00 00 13 95 00 10 00 0c |........|........|
|000037a0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 13 9c |........|........|
|000037b0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000037c0| 00 00 14 66 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...f....|........|
|000037d0| 00 00 00 00 00 00 14 6e | 00 10 00 0c 00 03 00 00 |.......n|........|
|000037e0| 00 0c 00 00 00 00 00 00 | 00 00 14 cb 00 10 00 0c |........|........|
|000037f0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 14 d3 |........|........|
|00003800| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003810| 00 00 15 0d 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00003820| 00 00 00 00 00 00 15 15 | 00 10 00 0c 00 03 00 00 |........|........|
|00003830| 00 0c 00 00 00 00 00 00 | 00 00 15 e0 00 10 00 0c |........|........|
|00003840| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 15 e8 |........|........|
|00003850| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003860| 00 00 18 58 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...X....|........|
|00003870| 00 00 00 00 00 00 18 62 | 00 10 00 0c 00 03 00 00 |.......b|........|
|00003880| 00 0c 00 00 00 00 00 00 | 00 00 19 9c 00 10 00 0c |........|........|
|00003890| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 19 a8 |........|........|
|000038a0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000038b0| 00 00 1a 2a 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...*....|........|
|000038c0| 00 00 00 00 00 00 1a 34 | 00 10 00 0c 00 03 00 00 |.......4|........|
|000038d0| 00 0c 00 00 00 00 00 00 | 00 00 1d 6a 00 10 00 0c |........|...j....|
|000038e0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 1d 70 |........|.......p|
|000038f0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003900| 00 00 1e b8 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00003910| 00 00 00 00 00 00 1e bf | 00 10 00 0c 00 03 00 00 |........|........|
|00003920| 00 0c 00 00 00 00 00 00 | 00 00 1f 89 00 10 00 0c |........|........|
|00003930| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 1f 93 |........|........|
|00003940| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003950| 00 00 20 ab 00 10 00 0c | 00 03 01 00 00 0c 00 00 |.. .....|........|
|00003960| 00 00 00 00 00 00 20 b4 | 00 10 00 0c 00 03 00 00 |...... .|........|
|00003970| 00 0c 00 00 00 00 00 00 | 00 00 21 cd 00 10 00 0c |........|..!.....|
|00003980| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 21 d7 |........|......!.|
|00003990| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000039a0| 00 00 29 22 00 10 00 0c | 00 03 01 00 00 0c 00 00 |..)"....|........|
|000039b0| 00 00 00 00 00 00 29 29 | 00 10 00 0c 00 03 00 00 |......))|........|
|000039c0| 00 0c 00 00 00 00 00 00 | 00 00 2b 6c 00 10 00 0c |........|..+l....|
|000039d0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 2b 7b |........|......+{|
|000039e0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000039f0| 00 00 2d 10 00 10 00 0c | 00 03 01 00 00 0c 00 00 |..-.....|........|
|00003a00| 00 00 00 00 00 00 2d 1c | 00 10 00 0c 00 03 00 00 |......-.|........|
|00003a10| 00 0c 00 00 00 00 00 00 | 00 00 2e 68 00 10 00 0c |........|...h....|
|00003a20| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 2e 74 |........|.......t|
|00003a30| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003a40| 00 00 30 1e 00 10 00 0c | 00 03 01 00 00 0c 00 00 |..0.....|........|
|00003a50| 00 00 00 00 00 00 30 27 | 00 10 00 0c 00 03 00 00 |......0'|........|
|00003a60| 00 0c 00 00 00 00 00 00 | 00 00 30 d7 00 10 00 0c |........|..0.....|
|00003a70| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 30 e0 |........|......0.|
|00003a80| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003a90| 00 00 32 9d 00 10 00 0c | 00 03 01 00 00 0c 00 00 |..2.....|........|
|00003aa0| 00 00 00 00 00 00 32 a7 | 00 10 00 0c 00 03 00 00 |......2.|........|
|00003ab0| 00 0c 00 00 00 00 00 00 | 00 00 33 a7 00 10 00 0c |........|..3.....|
|00003ac0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 33 b1 |........|......3.|
|00003ad0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00003ae0| 00 00 36 48 00 10 00 0c | 00 03 01 00 00 0c 00 00 |..6H....|........|
|00003af0| 00 00 00 00 00 00 36 52 | 00 10 00 0c 00 03 00 00 |......6R|........|
|00003b00| 00 0c 00 00 00 00 00 00 | |........| |
+--------+-------------------------+-------------------------+--------+--------+